| 1 | inherited frmPrintLocation: TfrmPrintLocation | 
|---|
| 2 | Left = 293 | 
|---|
| 3 | Top = 250 | 
|---|
| 4 | Width = 450 | 
|---|
| 5 | Height = 472 | 
|---|
| 6 | AutoScroll = True | 
|---|
| 7 | BorderIcons = [] | 
|---|
| 8 | Caption = 'Order Location' | 
|---|
| 9 | Constraints.MinWidth = 440 | 
|---|
| 10 | OldCreateOrder = False | 
|---|
| 11 | Position = poMainFormCenter | 
|---|
| 12 | OnClose = FormClose | 
|---|
| 13 | ExplicitWidth = 450 | 
|---|
| 14 | ExplicitHeight = 472 | 
|---|
| 15 | DesignSize = ( | 
|---|
| 16 | 442 | 
|---|
| 17 | 445) | 
|---|
| 18 | PixelsPerInch = 96 | 
|---|
| 19 | TextHeight = 13 | 
|---|
| 20 | object lblEncounter: TLabel [0] | 
|---|
| 21 | Left = 0 | 
|---|
| 22 | Top = 379 | 
|---|
| 23 | Width = 280 | 
|---|
| 24 | Height = 13 | 
|---|
| 25 | Caption = 'Where would you like to continue processing patient data? ' | 
|---|
| 26 | end | 
|---|
| 27 | object pnlTop: TPanel [1] | 
|---|
| 28 | Left = 0 | 
|---|
| 29 | Top = 0 | 
|---|
| 30 | Width = 442 | 
|---|
| 31 | Height = 153 | 
|---|
| 32 | Anchors = [akLeft, akTop, akRight] | 
|---|
| 33 | BevelOuter = bvNone | 
|---|
| 34 | TabOrder = 0 | 
|---|
| 35 | object lblText: TLabel | 
|---|
| 36 | Left = 8 | 
|---|
| 37 | Top = 16 | 
|---|
| 38 | Width = 3 | 
|---|
| 39 | Height = 13 | 
|---|
| 40 | end | 
|---|
| 41 | object orpnlTopBottom: TORAutoPanel | 
|---|
| 42 | Left = 0 | 
|---|
| 43 | Top = 112 | 
|---|
| 44 | Width = 442 | 
|---|
| 45 | Height = 41 | 
|---|
| 46 | Align = alBottom | 
|---|
| 47 | BevelOuter = bvNone | 
|---|
| 48 | TabOrder = 0 | 
|---|
| 49 | object btnClinic: TButton | 
|---|
| 50 | Left = 145 | 
|---|
| 51 | Top = 8 | 
|---|
| 52 | Width = 75 | 
|---|
| 53 | Height = 25 | 
|---|
| 54 | Caption = 'All Clinic' | 
|---|
| 55 | TabOrder = 0 | 
|---|
| 56 | OnClick = btnClinicClick | 
|---|
| 57 | end | 
|---|
| 58 | object btnWard: TButton | 
|---|
| 59 | Left = 230 | 
|---|
| 60 | Top = 8 | 
|---|
| 61 | Width = 75 | 
|---|
| 62 | Height = 25 | 
|---|
| 63 | Caption = 'All Ward' | 
|---|
| 64 | TabOrder = 1 | 
|---|
| 65 | OnClick = btnWardClick | 
|---|
| 66 | end | 
|---|
| 67 | end | 
|---|
| 68 | end | 
|---|
| 69 | object pnlBottom: TORAutoPanel [2] | 
|---|
| 70 | Left = 0 | 
|---|
| 71 | Top = 159 | 
|---|
| 72 | Width = 442 | 
|---|
| 73 | Height = 210 | 
|---|
| 74 | TabOrder = 1 | 
|---|
| 75 | object orderGrid: TStringGrid | 
|---|
| 76 | Left = 1 | 
|---|
| 77 | Top = 1 | 
|---|
| 78 | Width = 440 | 
|---|
| 79 | Height = 208 | 
|---|
| 80 | Align = alClient | 
|---|
| 81 | ColCount = 3 | 
|---|
| 82 | Constraints.MinWidth = 440 | 
|---|
| 83 | DefaultRowHeight = 30 | 
|---|
| 84 | Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSizing] | 
|---|
| 85 | ParentShowHint = False | 
|---|
| 86 | ShowHint = True | 
|---|
| 87 | TabOrder = 2 | 
|---|
| 88 | OnDrawCell = OrderGridDrawCell | 
|---|
| 89 | OnKeyPress = orderGridKeyPress | 
|---|
| 90 | OnMouseDown = orderGridMouseDown | 
|---|
| 91 | end | 
|---|
| 92 | object pnlOrder: TPanel | 
|---|
| 93 | Left = 264 | 
|---|
| 94 | Top = 56 | 
|---|
| 95 | Width = 97 | 
|---|
| 96 | Height = 25 | 
|---|
| 97 | TabOrder = 0 | 
|---|
| 98 | Visible = False | 
|---|
| 99 | end | 
|---|
| 100 | object cbolocation: TORComboBox | 
|---|
| 101 | Left = 240 | 
|---|
| 102 | Top = 104 | 
|---|
| 103 | Width = 121 | 
|---|
| 104 | Height = 21 | 
|---|
| 105 | Style = orcsDropDown | 
|---|
| 106 | AutoSelect = True | 
|---|
| 107 | Color = clWindow | 
|---|
| 108 | DropDownCount = 8 | 
|---|
| 109 | ItemHeight = 13 | 
|---|
| 110 | ItemTipColor = clWindow | 
|---|
| 111 | ItemTipEnable = True | 
|---|
| 112 | ListItemsOnly = False | 
|---|
| 113 | LongList = False | 
|---|
| 114 | LookupPiece = 1 | 
|---|
| 115 | MaxLength = 0 | 
|---|
| 116 | Sorted = False | 
|---|
| 117 | SynonymChars = '<>' | 
|---|
| 118 | TabOrder = 1 | 
|---|
| 119 | Visible = False | 
|---|
| 120 | OnChange = cbolocationChange | 
|---|
| 121 | OnExit = cbolocationExit | 
|---|
| 122 | CharsNeedMatch = 1 | 
|---|
| 123 | UniqueAutoComplete = True | 
|---|
| 124 | end | 
|---|
| 125 | end | 
|---|
| 126 | object ORpnlBottom: TORAutoPanel [3] | 
|---|
| 127 | Left = 0 | 
|---|
| 128 | Top = 404 | 
|---|
| 129 | Width = 442 | 
|---|
| 130 | Height = 41 | 
|---|
| 131 | BevelEdges = [] | 
|---|
| 132 | BevelOuter = bvNone | 
|---|
| 133 | TabOrder = 3 | 
|---|
| 134 | object btnOK: TButton | 
|---|
| 135 | Left = 187 | 
|---|
| 136 | Top = 3 | 
|---|
| 137 | Width = 75 | 
|---|
| 138 | Height = 25 | 
|---|
| 139 | Caption = 'OK' | 
|---|
| 140 | TabOrder = 0 | 
|---|
| 141 | OnClick = btnOKClick | 
|---|
| 142 | end | 
|---|
| 143 | end | 
|---|
| 144 | object cboEncLoc: TComboBox [4] | 
|---|
| 145 | Left = 284 | 
|---|
| 146 | Top = 375 | 
|---|
| 147 | Width = 104 | 
|---|
| 148 | Height = 21 | 
|---|
| 149 | Anchors = [akLeft, akTop, akRight, akBottom] | 
|---|
| 150 | ItemHeight = 0 | 
|---|
| 151 | TabOrder = 2 | 
|---|
| 152 | end | 
|---|
| 153 | inherited amgrMain: TVA508AccessibilityManager | 
|---|
| 154 | Data = ( | 
|---|
| 155 | ( | 
|---|
| 156 | 'Component = pnlTop' | 
|---|
| 157 | 'Status = stsDefault') | 
|---|
| 158 | ( | 
|---|
| 159 | 'Component = orpnlTopBottom' | 
|---|
| 160 | 'Status = stsDefault') | 
|---|
| 161 | ( | 
|---|
| 162 | 'Component = btnClinic' | 
|---|
| 163 | 'Status = stsDefault') | 
|---|
| 164 | ( | 
|---|
| 165 | 'Component = btnWard' | 
|---|
| 166 | 'Status = stsDefault') | 
|---|
| 167 | ( | 
|---|
| 168 | 'Component = pnlBottom' | 
|---|
| 169 | 'Status = stsDefault') | 
|---|
| 170 | ( | 
|---|
| 171 | 'Component = orderGrid' | 
|---|
| 172 | 'Status = stsDefault') | 
|---|
| 173 | ( | 
|---|
| 174 | 'Component = pnlOrder' | 
|---|
| 175 | 'Status = stsDefault') | 
|---|
| 176 | ( | 
|---|
| 177 | 'Component = cbolocation' | 
|---|
| 178 | 'Status = stsDefault') | 
|---|
| 179 | ( | 
|---|
| 180 | 'Component = ORpnlBottom' | 
|---|
| 181 | 'Status = stsDefault') | 
|---|
| 182 | ( | 
|---|
| 183 | 'Component = btnOK' | 
|---|
| 184 | 'Status = stsDefault') | 
|---|
| 185 | ( | 
|---|
| 186 | 'Component = cboEncLoc' | 
|---|
| 187 | 'Status = stsDefault') | 
|---|
| 188 | ( | 
|---|
| 189 | 'Component = frmPrintLocation' | 
|---|
| 190 | 'Status = stsDefault')) | 
|---|
| 191 | end | 
|---|
| 192 | end | 
|---|