Last change
on this file since 1703 was 1693, checked in by healthsevak, 10 years ago |
Committing the files for first time to this new branch
|
File size:
2.9 KB
|
Rev | Line | |
---|
[456] | 1 | inherited frmODMisc: TfrmODMisc
|
---|
| 2 | Left = 404
|
---|
| 3 | Top = 453
|
---|
| 4 | Caption = 'Patient Care Order'
|
---|
| 5 | PixelsPerInch = 96
|
---|
| 6 | TextHeight = 13
|
---|
| 7 | object lblStart: TLabel [0]
|
---|
| 8 | Left = 6
|
---|
| 9 | Top = 100
|
---|
| 10 | Width = 76
|
---|
| 11 | Height = 13
|
---|
| 12 | Caption = 'Start Date/Time'
|
---|
| 13 | end
|
---|
| 14 | object lblStop: TLabel [1]
|
---|
| 15 | Left = 158
|
---|
| 16 | Top = 100
|
---|
| 17 | Width = 76
|
---|
| 18 | Height = 13
|
---|
| 19 | Caption = 'Stop Date/Time'
|
---|
| 20 | end
|
---|
| 21 | object lblCare: TLabel [2]
|
---|
| 22 | Left = 6
|
---|
| 23 | Top = 6
|
---|
| 24 | Width = 58
|
---|
| 25 | Height = 13
|
---|
| 26 | Caption = 'Patient Care'
|
---|
| 27 | end
|
---|
| 28 | object lblComment: TLabel [3]
|
---|
| 29 | Left = 6
|
---|
| 30 | Top = 53
|
---|
| 31 | Width = 54
|
---|
| 32 | Height = 13
|
---|
| 33 | Caption = 'Instructions'
|
---|
| 34 | end
|
---|
| 35 | inherited memOrder: TCaptionMemo
|
---|
[1693] | 36 | TabStop = False
|
---|
| 37 | TabOrder = 5
|
---|
[456] | 38 | end
|
---|
| 39 | inherited cmdAccept: TButton
|
---|
[1693] | 40 | TabOrder = 6
|
---|
[456] | 41 | end
|
---|
| 42 | inherited cmdQuit: TButton
|
---|
[1693] | 43 | TabOrder = 7
|
---|
[456] | 44 | end
|
---|
| 45 | inherited pnlMessage: TPanel
|
---|
[1693] | 46 | TabOrder = 1
|
---|
[456] | 47 | end
|
---|
[829] | 48 | object cboCare: TORComboBox [8]
|
---|
[1693] | 49 | Left = 8
|
---|
| 50 | Top = 25
|
---|
[456] | 51 | Width = 292
|
---|
| 52 | Height = 21
|
---|
| 53 | Style = orcsDropDown
|
---|
| 54 | AutoSelect = True
|
---|
[1693] | 55 | Caption = 'Patient Care'
|
---|
[456] | 56 | Color = clWindow
|
---|
| 57 | DropDownCount = 8
|
---|
| 58 | ItemHeight = 13
|
---|
| 59 | ItemTipColor = clWindow
|
---|
| 60 | ItemTipEnable = True
|
---|
| 61 | ListItemsOnly = True
|
---|
| 62 | LongList = True
|
---|
[829] | 63 | LookupPiece = 0
|
---|
[456] | 64 | MaxLength = 0
|
---|
| 65 | Pieces = '2'
|
---|
| 66 | Sorted = False
|
---|
| 67 | SynonymChars = '<>'
|
---|
| 68 | TabOrder = 0
|
---|
| 69 | OnExit = ControlChange
|
---|
| 70 | OnMouseClick = ControlChange
|
---|
| 71 | OnNeedData = cboCareNeedData
|
---|
[829] | 72 | CharsNeedMatch = 1
|
---|
[456] | 73 | end
|
---|
[829] | 74 | object calStart: TORDateBox [9]
|
---|
[456] | 75 | Left = 6
|
---|
| 76 | Top = 114
|
---|
| 77 | Width = 140
|
---|
| 78 | Height = 21
|
---|
[1693] | 79 | TabOrder = 3
|
---|
[456] | 80 | Text = 'Now'
|
---|
| 81 | OnChange = ControlChange
|
---|
| 82 | DateOnly = False
|
---|
| 83 | RequireTime = False
|
---|
| 84 | Caption = 'Start Date/Time'
|
---|
| 85 | end
|
---|
[829] | 86 | object calStop: TORDateBox [10]
|
---|
[456] | 87 | Left = 158
|
---|
| 88 | Top = 114
|
---|
| 89 | Width = 140
|
---|
| 90 | Height = 21
|
---|
[1693] | 91 | TabOrder = 4
|
---|
[456] | 92 | OnChange = ControlChange
|
---|
| 93 | DateOnly = False
|
---|
| 94 | RequireTime = False
|
---|
| 95 | Caption = 'Stop Date/Time'
|
---|
| 96 | end
|
---|
[829] | 97 | object txtComment: TCaptionEdit [11]
|
---|
[456] | 98 | Left = 6
|
---|
| 99 | Top = 67
|
---|
| 100 | Width = 508
|
---|
| 101 | Height = 21
|
---|
[1693] | 102 | TabOrder = 2
|
---|
[456] | 103 | OnChange = ControlChange
|
---|
| 104 | Caption = 'Instructions'
|
---|
| 105 | end
|
---|
[829] | 106 | inherited amgrMain: TVA508AccessibilityManager
|
---|
| 107 | Data = (
|
---|
| 108 | (
|
---|
| 109 | 'Component = cboCare'
|
---|
| 110 | 'Status = stsDefault')
|
---|
| 111 | (
|
---|
| 112 | 'Component = calStart'
|
---|
| 113 | 'Status = stsDefault')
|
---|
| 114 | (
|
---|
| 115 | 'Component = calStop'
|
---|
| 116 | 'Status = stsDefault')
|
---|
| 117 | (
|
---|
| 118 | 'Component = txtComment'
|
---|
| 119 | 'Status = stsDefault')
|
---|
| 120 | (
|
---|
| 121 | 'Component = memOrder'
|
---|
| 122 | 'Status = stsDefault')
|
---|
| 123 | (
|
---|
| 124 | 'Component = cmdAccept'
|
---|
| 125 | 'Status = stsDefault')
|
---|
| 126 | (
|
---|
| 127 | 'Component = cmdQuit'
|
---|
| 128 | 'Status = stsDefault')
|
---|
| 129 | (
|
---|
| 130 | 'Component = pnlMessage'
|
---|
| 131 | 'Status = stsDefault')
|
---|
| 132 | (
|
---|
| 133 | 'Component = memMessage'
|
---|
| 134 | 'Status = stsDefault')
|
---|
| 135 | (
|
---|
| 136 | 'Component = frmODMisc'
|
---|
| 137 | 'Status = stsDefault'))
|
---|
| 138 | end
|
---|
[456] | 139 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.