Changeset 830 for cprs/trunk/CPRS-Chart/fARTAllgy.dfm
- Timestamp:
- Jul 7, 2010, 4:51:54 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/trunk/CPRS-Chart/fARTAllgy.dfm
r456 r830 3 3 Left = 339 4 4 Top = 266 5 Width = 5616 Height = 4657 5 Caption = 'Enter Allergy or Adverse Reaction' 6 ClientHeight = 438 7 ClientWidth = 553 8 8 Position = poScreenCenter 9 9 OnClose = FormClose 10 10 OnCloseQuery = FormCloseQuery 11 11 OnCreate = FormCreate 12 ExplicitWidth = 561 13 ExplicitHeight = 472 12 14 PixelsPerInch = 96 13 15 TextHeight = 13 14 object pnlBase: TORAutoPanel 16 object pnlBase: TORAutoPanel [0] 15 17 Left = 0 16 18 Top = 0 … … 37 39 Width = 72 38 40 Height = 21 39 Caption = ' OK'41 Caption = '&OK' 40 42 TabOrder = 1 41 43 OnClick = cmdOKClick … … 47 49 Height = 21 48 50 Cancel = True 49 Caption = ' Cancel'51 Caption = '&Cancel' 50 52 TabOrder = 2 51 53 OnClick = cmdCancelClick … … 58 60 ActivePage = tabGeneral 59 61 MultiLine = True 60 TabIndex = 061 62 TabOrder = 0 62 63 object tabGeneral: TTabSheet 63 Caption = ' &General'64 Caption = 'General' 64 65 object lblAgent: TOROffsetLabel 65 66 Left = 7 … … 186 187 Width = 119 187 188 Height = 17 188 Caption = ' No Known Allergies'189 Caption = '&No Known Allergies' 189 190 TabOrder = 0 190 191 OnClick = ckNoKnownAllergiesClick … … 195 196 Width = 114 196 197 Height = 21 197 Caption = ' Active Allergies'198 Caption = '&Active Allergies' 198 199 TabOrder = 1 199 200 OnClick = btnCurrentClick … … 223 224 Style = orcsDropDown 224 225 AutoSelect = True 225 Color = cl Window226 Color = clBtnFace 226 227 DropDownCount = 8 228 Enabled = False 229 Font.Charset = DEFAULT_CHARSET 230 Font.Color = clInactiveCaption 231 Font.Height = -11 232 Font.Name = 'MS Sans Serif' 233 Font.Style = [] 227 234 ItemHeight = 13 228 235 ItemTipColor = clWindow … … 232 239 LookupPiece = 2 233 240 MaxLength = 0 241 ParentFont = False 234 242 ParentShowHint = False 235 243 Pieces = '2,3' … … 259 267 Width = 113 260 268 Height = 17 261 Caption = ' Marked On Chart'269 Caption = '&Marked On Chart' 262 270 Checked = True 263 271 State = cbChecked … … 271 279 Width = 97 272 280 Height = 17 273 Caption = ' ID Band Marked'281 Caption = '&ID Band Marked' 274 282 TabOrder = 17 275 283 OnClick = ControlChange … … 320 328 Width = 62 321 329 Height = 21 322 Caption = ' Date/Time'330 Caption = '&Date/Time' 323 331 TabOrder = 13 324 332 OnClick = btnDateTimeClick … … 329 337 Width = 57 330 338 Height = 21 331 Caption = ' Remove'339 Caption = '&Remove' 332 340 TabOrder = 14 333 341 OnClick = btnRemoveClick … … 341 349 Ctl3D = True 342 350 Items.Strings = ( 343 'O bserved'344 ' Historical')351 'O&bserved' 352 '&Historical') 345 353 ParentCtl3D = False 346 354 ParentShowHint = False … … 388 396 Width = 140 389 397 Height = 21 390 Caption = 'View Previous Observations'398 Caption = 'View &Previous Observations' 391 399 TabOrder = 6 392 400 OnClick = cmdPrevObsClick … … 412 420 Width = 157 413 421 Height = 21 414 Caption = ' View Previous Comments'422 Caption = '&View Previous Comments' 415 423 TabOrder = 16 416 424 OnClick = cmdPrevCmtsClick … … 444 452 Width = 21 445 453 Height = 21 446 Caption = ' ?'454 Caption = '&?' 447 455 Font.Charset = DEFAULT_CHARSET 448 456 Font.Color = clWindowText … … 456 464 end 457 465 object tabVerify: TTabSheet 458 Caption = ' &Verify'466 Caption = 'Verify' 459 467 ImageIndex = 3 460 468 object lblVerifier: TOROffsetLabel … … 485 493 Width = 69 486 494 Height = 17 487 Caption = ' Verified'495 Caption = '&Verified' 488 496 TabOrder = 0 489 497 OnClick = ControlChange … … 548 556 Font.Style = [fsBold] 549 557 ParentFont = False 558 ExplicitWidth = 83 550 559 end 551 560 object ckEnteredInError: TCheckBox … … 554 563 Width = 203 555 564 Height = 17 556 Caption = ' Mark this allergy as "Entered In Error"'565 Caption = '&Mark this allergy as "Entered In Error"' 557 566 TabOrder = 0 558 567 Visible = False … … 602 611 end 603 612 end 613 inherited amgrMain: TVA508AccessibilityManager 614 Data = ( 615 ( 616 'Component = pnlBase' 617 'Status = stsDefault') 618 ( 619 'Component = cmdOK' 620 'Status = stsDefault') 621 ( 622 'Component = cmdCancel' 623 'Status = stsDefault') 624 ( 625 'Component = pgAllergy' 626 'Status = stsDefault') 627 ( 628 'Component = tabGeneral' 629 'Status = stsDefault') 630 ( 631 'Component = ckNoKnownAllergies' 632 'Status = stsDefault') 633 ( 634 'Component = btnCurrent' 635 'Status = stsDefault') 636 ( 637 'Component = lstAllergy' 638 'Status = stsDefault') 639 ( 640 'Component = cboOriginator' 641 'Status = stsDefault') 642 ( 643 'Component = calOriginated' 644 'Status = stsDefault') 645 ( 646 'Component = ckChartMarked' 647 'Status = stsDefault') 648 ( 649 'Component = ckIDBand' 650 'Status = stsDefault') 651 ( 652 'Component = cboSymptoms' 653 'Status = stsDefault') 654 ( 655 'Component = lstSelectedSymptoms' 656 'Status = stsDefault') 657 ( 658 'Component = btnDateTime' 659 'Status = stsDefault') 660 ( 661 'Component = btnRemove' 662 'Status = stsDefault') 663 ( 664 'Component = grpObsHist' 665 'Status = stsDefault') 666 ( 667 'Component = cboSeverity' 668 'Status = stsDefault') 669 ( 670 'Component = calObservedDate' 671 'Status = stsDefault') 672 ( 673 'Component = cmdPrevObs' 674 'Status = stsDefault') 675 ( 676 'Component = memComments' 677 'Status = stsDefault') 678 ( 679 'Component = cmdPrevCmts' 680 'Status = stsDefault') 681 ( 682 'Component = cboNatureOfReaction' 683 'Status = stsDefault') 684 ( 685 'Component = btnSevHelp' 686 'Status = stsDefault') 687 ( 688 'Component = tabVerify' 689 'Status = stsDefault') 690 ( 691 'Component = ckVerified' 692 'Status = stsDefault') 693 ( 694 'Component = cboVerifier' 695 'Status = stsDefault') 696 ( 697 'Component = calVerifyDate' 698 'Status = stsDefault') 699 ( 700 'Component = tabEnteredInError' 701 'Status = stsDefault') 702 ( 703 'Component = ckEnteredInError' 704 'Status = stsDefault') 705 ( 706 'Component = memErrCmts' 707 'Status = stsDefault') 708 ( 709 'Component = cboAllergyType' 710 'Status = stsDefault') 711 ( 712 'Component = frmARTAllergy' 713 'Status = stsDefault')) 714 end 604 715 object dlgReactionDateTime: TORDateTimeDlg 605 FMDateTime = 2981202 716 FMDateTime = 2981202.000000000000000000 606 717 DateOnly = False 607 718 RequireTime = False
Note:
See TracChangeset
for help on using the changeset viewer.