Changeset 830 for cprs/trunk/CPRS-Chart/fMedCopy.dfm
- Timestamp:
- Jul 7, 2010, 4:51:54 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/trunk/CPRS-Chart/fMedCopy.dfm
r456 r830 1 objectfrmMedCopy: TfrmMedCopy1 inherited frmMedCopy: TfrmMedCopy 2 2 Left = 157 3 3 Top = 62 4 Width = 4935 Height = 4286 4 Caption = 'Copy Medication Orders' 7 Color = clBtnFace 5 ClientHeight = 401 6 ClientWidth = 485 8 7 Constraints.MinHeight = 150 9 8 Constraints.MinWidth = 240 10 Font.Charset = DEFAULT_CHARSET11 Font.Color = clWindowText12 Font.Height = -1113 Font.Name = 'MS Sans Serif'14 Font.Style = []15 9 OldCreateOrder = True 16 10 OnCreate = FormCreate 17 OnKeyDown = FormKeyDown 11 ExplicitWidth = 493 12 ExplicitHeight = 428 18 13 PixelsPerInch = 96 19 14 TextHeight = 13 20 object Panel1: TPanel15 object pnlTop: TPanel [0] 21 16 Left = 0 22 17 Top = 0 23 18 Width = 485 24 Height = 7519 Height = 80 25 20 Align = alTop 26 21 AutoSize = True 27 TabOrder = 1 28 object lblPtInfo: TLabel 22 TabOrder = 0 23 object lblPtInfo: TVA508StaticText 24 Name = 'lblPtInfo' 29 25 Left = 1 30 26 Top = 1 31 Width = 4 8327 Width = 464 32 28 Height = 40 33 Align = alTop 29 Alignment = taLeftJustify 30 AutoSize = True 34 31 Constraints.MinHeight = 40 35 Layout = tlCenter 36 end 37 object Panel2: TPanel 38 Left = 1 39 Top = 41 32 TabOrder = 1 33 ShowAccelChar = True 34 end 35 object pnlInpatient: TPanel 36 Left = 1 37 Top = 46 40 38 Width = 483 41 39 Height = 33 42 Align = al Top40 Align = alBottom 43 41 AutoSize = True 44 42 TabOrder = 0 … … 70 68 Left = 30 71 69 Top = 1 72 Width = 44170 Width = 337 73 71 Height = 17 74 72 Caption = … … 77 75 TabOrder = 0 78 76 end 79 object Label1: TStaticText77 object lblInstruction2: TStaticText 80 78 Left = 30 81 79 Top = 15 82 Width = 45580 Width = 371 83 81 Height = 17 84 82 Caption = … … 89 87 end 90 88 end 91 object Panel3: TPanel89 object pnlMiddle: TPanel [1] 92 90 Left = 0 93 Top = 7591 Top = 80 94 92 Width = 485 95 93 Height = 65 96 94 Align = alTop 97 TabOrder = 098 object GroupBox2: TGroupBox95 TabOrder = 1 96 object gboxMain: TGroupBox 99 97 Left = 1 100 98 Top = 1 … … 103 101 Align = alClient 104 102 TabOrder = 0 105 DesignSize = (106 483107 63)108 103 object radDelayed: TRadioButton 109 104 Left = 20 … … 128 123 object cmdOK: TButton 129 124 Left = 365 130 Top = 1 5125 Top = 14 131 126 Width = 72 132 127 Height = 19 133 Anchors = [akTop, akRight]134 128 Caption = 'OK' 135 129 Constraints.MaxWidth = 73 … … 140 134 object cmdCancel: TButton 141 135 Left = 365 142 Top = 3 7136 Top = 38 143 137 Width = 72 144 138 Height = 19 145 Anchors = [akTop, akRight]146 139 Cancel = True 147 140 Caption = 'Cancel' … … 152 145 end 153 146 end 154 object Panel4: TPanel147 object pnlBottom: TPanel [2] 155 148 Left = 0 156 Top = 14 0149 Top = 145 157 150 Width = 485 158 Height = 2 61151 Height = 256 159 152 Align = alClient 160 153 TabOrder = 2 … … 163 156 Top = 1 164 157 Width = 483 165 Height = 259 166 Align = alClient 158 Height = 254 159 Align = alBottom 160 AutoScroll = True 167 161 TabOrder = 0 162 TabStop = True 168 163 Visible = False 164 ExplicitLeft = 1 165 ExplicitTop = 1 166 ExplicitWidth = 483 167 ExplicitHeight = 254 169 168 inherited pnlDate: TPanel 170 169 Left = 378 171 Height = 259 170 Height = 254 171 ExplicitLeft = 378 172 ExplicitHeight = 254 172 173 inherited lblEffective: TLabel 173 174 Left = 446 175 Width = 71 176 ExplicitLeft = 446 177 ExplicitWidth = 71 174 178 end 175 179 inherited orDateBox: TORDateBox 176 180 Left = 446 181 ExplicitLeft = 446 177 182 end 178 183 end 179 184 inherited pnlList: TPanel 180 185 Width = 378 181 Height = 259 186 Height = 254 187 ExplicitWidth = 378 188 ExplicitHeight = 254 189 inherited lblEvntDelayList: TLabel 190 Width = 376 191 ExplicitWidth = 80 192 end 182 193 inherited mlstEvents: TORListBox 183 194 Width = 376 184 Height = 2 36195 Height = 218 185 196 OnDblClick = cmdOKClick 197 ExplicitWidth = 376 198 ExplicitHeight = 218 186 199 end 187 200 inherited edtSearch: TCaptionEdit 188 201 Width = 376 189 end 190 end 191 end 202 ExplicitWidth = 376 203 end 204 end 205 end 206 end 207 inherited amgrMain: TVA508AccessibilityManager 208 Data = ( 209 ( 210 'Component = pnlTop' 211 'Status = stsDefault') 212 ( 213 'Component = pnlInpatient' 214 'Status = stsDefault') 215 ( 216 'Component = lblInstruction' 217 'Status = stsDefault') 218 ( 219 'Component = lblInstruction2' 220 'Status = stsDefault') 221 ( 222 'Component = pnlMiddle' 223 'Status = stsDefault') 224 ( 225 'Component = gboxMain' 226 'Status = stsDefault') 227 ( 228 'Component = radDelayed' 229 'Status = stsDefault') 230 ( 231 'Component = radRelease' 232 'Status = stsDefault') 233 ( 234 'Component = cmdOK' 235 'Status = stsDefault') 236 ( 237 'Component = cmdCancel' 238 'Status = stsDefault') 239 ( 240 'Component = pnlBottom' 241 'Status = stsDefault') 242 ( 243 'Component = fraEvntDelayList' 244 'Status = stsDefault') 245 ( 246 'Component = fraEvntDelayList.pnlDate' 247 'Status = stsDefault') 248 ( 249 'Component = fraEvntDelayList.orDateBox' 250 'Status = stsDefault') 251 ( 252 'Component = fraEvntDelayList.pnlList' 253 'Status = stsDefault') 254 ( 255 'Component = fraEvntDelayList.mlstEvents' 256 'Status = stsDefault') 257 ( 258 'Component = fraEvntDelayList.edtSearch' 259 'Status = stsDefault') 260 ( 261 'Component = frmMedCopy' 262 'Status = stsDefault')) 192 263 end 193 264 end
Note:
See TracChangeset
for help on using the changeset viewer.