source: cprs/trunk/CPRS-Chart/Orders/fODMedOut.dfm@ 1028

Last change on this file since 1028 was 829, checked in by Kevin Toppenberg, 15 years ago

Upgrade to version 27
File size: 10.9 KB
RevLine 
[456]1inherited frmODMedOut: TfrmODMedOut
2 Left = 427
3 Top = 145
4 Height = 316
5 Caption = 'Outpatient Medication Order'
[829]6 ExplicitHeight = 316
[456]7 PixelsPerInch = 96
8 TextHeight = 13
9 object lblMedication: TLabel [0]
10 Left = 6
11 Top = 4
12 Width = 52
13 Height = 13
14 Caption = 'Medication'
15 end
16 object lblDosage: TLabel [1]
17 Left = 202
18 Top = 45
19 Width = 28
20 Height = 13
21 Caption = 'TAKE'
22 end
23 object lblRoute: TLabel [2]
24 Left = 314
25 Top = 45
26 Width = 29
27 Height = 13
28 Caption = 'Route'
29 end
30 object lblSchedule: TLabel [3]
31 Left = 392
32 Top = 45
33 Width = 45
34 Height = 13
35 Caption = 'Schedule'
36 end
37 object lblDispense: TLabel [4]
38 Left = 6
39 Top = 45
40 Width = 70
41 Height = 13
42 Caption = 'Dispense Drug'
43 end
44 object Bevel1: TBevel [5]
45 Left = 192
46 Top = 0
47 Width = 4
48 Height = 227
49 end
50 object lblQuantity: TLabel [6]
51 Left = 470
52 Top = 45
53 Width = 39
54 Height = 13
55 Caption = 'Quantity'
56 end
57 object lblPickup: TLabel [7]
58 Left = 202
59 Top = 142
60 Width = 38
61 Height = 13
62 Caption = 'Pick Up'
63 end
64 object lblSC: TLabel [8]
65 Left = 314
66 Top = 142
67 Width = 43
68 Height = 13
69 Caption = 'SC? Y/N'
70 Font.Charset = DEFAULT_CHARSET
71 Font.Color = clWindowText
72 Font.Height = -11
73 Font.Name = 'MS Sans Serif'
74 Font.Style = []
75 ParentFont = False
76 end
77 object lblRefills: TLabel [9]
78 Left = 470
79 Top = 91
80 Width = 28
81 Height = 13
82 Caption = 'Refills'
83 end
84 object lblComment: TLabel [10]
85 Left = 202
86 Top = 183
87 Width = 49
88 Height = 13
89 Caption = 'Comments'
90 end
91 object lblPriority: TLabel [11]
92 Left = 392
93 Top = 142
94 Width = 31
95 Height = 13
96 Caption = 'Priority'
97 end
98 object btnUnits: TSpeedButton [12]
99 Left = 248
100 Top = 61
101 Width = 63
102 Height = 15
103 Caption = 'TABLET(S)'
104 Flat = True
105 Glyph.Data = {
106 AE000000424DAE0000000000000076000000280000000E000000070000000100
107 0400000000003800000000000000000000001000000010000000000000000000
108 8000008000000080800080000000800080008080000080808000C0C0C0000000
109 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
110 330033333333333333003330333333733300330003333F87330030000033FFFF
111 F30033333333333333003333333333333300}
112 Layout = blGlyphRight
113 NumGlyphs = 2
114 Spacing = 0
115 OnClick = btnUnitsClick
116 end
117 object lblSIG: TLabel [13]
118 Left = 314
119 Top = 4
120 Width = 18
121 Height = 13
122 Caption = 'SIG'
123 Visible = False
124 end
125 object memComplex: TMemo [14]
126 Left = 202
127 Top = 45
128 Width = 262
129 Height = 91
130 Color = clBtnFace
131 TabOrder = 19
132 Visible = False
133 end
134 object txtSIG: TCaptionEdit [15]
135 Left = 314
136 Top = 18
137 Width = 200
138 Height = 21
139 Color = clInfoBk
140 TabOrder = 18
141 Visible = False
142 Caption = 'SIG'
143 end
144 object cboDispense: TORComboBox [16]
145 Left = 6
146 Top = 59
147 Width = 180
148 Height = 168
149 Style = orcsSimple
150 AutoSelect = True
151 Color = clWindow
152 DropDownCount = 8
153 ItemHeight = 13
154 ItemTipColor = clWindow
155 ItemTipEnable = True
156 ListItemsOnly = False
157 LongList = False
158 LookupPiece = 0
159 MaxLength = 0
160 ParentShowHint = False
161 Pieces = '2,4,3'
162 ShowHint = True
163 Sorted = False
164 SynonymChars = '<>'
165 TabPositions = '30,33'
166 TabOrder = 2
167 OnChange = ControlChange
168 OnExit = cboDispenseExit
169 OnMouseClick = cboDispenseMouseClick
170 CharsNeedMatch = 1
171 end
172 object cboMedication: TORComboBox [17]
173 Left = 6
174 Top = 18
175 Width = 180
176 Height = 208
177 Style = orcsSimple
178 AutoSelect = True
179 Color = clWindow
180 DropDownCount = 11
181 ItemHeight = 13
182 ItemTipColor = clWindow
183 ItemTipEnable = True
184 ListItemsOnly = False
185 LongList = True
186 LookupPiece = 0
187 MaxLength = 0
188 Pieces = '2'
189 Sorted = False
190 SynonymChars = '<>'
191 TabOrder = 0
192 OnChange = ControlChange
193 OnExit = cboMedicationSelect
194 OnMouseClick = cboMedicationSelect
195 OnNeedData = cboMedicationNeedData
196 CharsNeedMatch = 1
197 end
198 inherited memOrder: TCaptionMemo
199 Top = 235
200 TabOrder = 15
[829]201 ExplicitTop = 235
[456]202 end
[829]203 object cboRoute: TORComboBox [19]
[456]204 Left = 314
205 Top = 59
206 Width = 72
207 Height = 77
208 Style = orcsSimple
209 AutoSelect = True
210 Color = clWindow
211 DropDownCount = 8
212 ItemHeight = 13
213 ItemTipColor = clWindow
214 ItemTipEnable = True
215 ListItemsOnly = False
216 LongList = False
217 LookupPiece = 0
218 MaxLength = 0
219 Pieces = '2'
220 Sorted = False
221 SynonymChars = '<>'
222 TabOrder = 4
223 OnChange = ControlChange
224 CharsNeedMatch = 1
225 end
[829]226 object cboSchedule: TORComboBox [20]
[456]227 Left = 392
228 Top = 59
229 Width = 72
230 Height = 77
231 Style = orcsSimple
232 AutoSelect = True
233 Color = clWindow
234 DropDownCount = 8
235 ItemHeight = 13
236 ItemTipColor = clWindow
237 ItemTipEnable = True
238 ListItemsOnly = False
239 LongList = False
240 LookupPiece = 0
241 MaxLength = 0
242 Sorted = False
243 SynonymChars = '<>'
244 TabOrder = 5
245 OnChange = ControlChange
246 CharsNeedMatch = 1
247 end
[829]248 object memComments: TMemo [21]
[456]249 Left = 202
250 Top = 197
251 Width = 311
252 Height = 32
253 ScrollBars = ssVertical
254 TabOrder = 12
255 OnChange = ControlChange
256 OnEnter = memCommentsEnter
257 end
[829]258 object cboPriority: TORComboBox [22]
[456]259 Left = 392
260 Top = 156
261 Width = 72
262 Height = 21
263 Style = orcsDropDown
264 AutoSelect = True
265 Color = clWindow
266 DropDownCount = 8
267 ItemHeight = 13
268 ItemTipColor = clWindow
269 ItemTipEnable = True
270 ListItemsOnly = False
271 LongList = False
272 LookupPiece = 0
273 MaxLength = 0
274 Pieces = '2'
275 Sorted = False
276 SynonymChars = '<>'
277 TabOrder = 11
278 OnChange = ControlChange
279 CharsNeedMatch = 1
280 end
[829]281 object cboMedAlt: TORComboBox [23]
[456]282 Left = 6
283 Top = 18
284 Width = 180
285 Height = 21
286 Style = orcsDropDown
287 AutoSelect = True
288 Color = clWindow
289 DropDownCount = 11
290 ItemHeight = 13
291 ItemTipColor = clWindow
292 ItemTipEnable = True
293 ListItemsOnly = False
294 LongList = True
295 LookupPiece = 0
296 MaxLength = 0
297 Pieces = '2'
298 Sorted = False
299 SynonymChars = '<>'
300 TabOrder = 1
301 Visible = False
302 OnChange = ControlChange
303 OnExit = cboMedicationSelect
304 OnMouseClick = cboMedicationSelect
305 OnNeedData = cboMedicationNeedData
306 CharsNeedMatch = 1
307 end
[829]308 object cboInstructions: TORComboBox [24]
[456]309 Left = 203
310 Top = 59
311 Width = 45
312 Height = 77
313 Style = orcsSimple
314 AutoSelect = True
315 Color = clWindow
316 DropDownCount = 8
317 ItemHeight = 13
318 ItemTipColor = clWindow
319 ItemTipEnable = True
320 ListItemsOnly = False
321 LongList = False
322 LookupPiece = 0
323 MaxLength = 80
324 Sorted = False
325 SynonymChars = '<>'
326 TabOrder = 3
327 OnChange = ControlChange
328 CharsNeedMatch = 1
329 end
[829]330 object cboPickup: TORComboBox [25]
[456]331 Left = 202
332 Top = 156
333 Width = 106
334 Height = 21
335 Style = orcsDropDown
336 AutoSelect = True
337 Color = clWindow
338 DropDownCount = 8
339 ItemHeight = 13
340 ItemTipColor = clWindow
341 ItemTipEnable = True
342 ListItemsOnly = False
343 LongList = False
344 LookupPiece = 0
345 MaxLength = 0
346 Pieces = '2'
347 Sorted = False
348 SynonymChars = '<>'
349 TabOrder = 9
350 OnChange = ControlChange
351 CharsNeedMatch = 1
352 end
[829]353 object cboSC: TORComboBox [26]
[456]354 Left = 314
355 Top = 156
356 Width = 72
357 Height = 21
358 Style = orcsDropDown
359 AutoSelect = True
360 Color = clWindow
361 DropDownCount = 8
362 ItemHeight = 13
363 ItemTipColor = clWindow
364 ItemTipEnable = True
365 ListItemsOnly = False
366 LongList = False
367 LookupPiece = 0
368 MaxLength = 0
369 Pieces = '2'
370 Sorted = False
371 SynonymChars = '<>'
372 TabOrder = 10
373 OnChange = ControlChange
374 OnEnter = cboSCEnter
375 CharsNeedMatch = 1
376 end
[829]377 object txtQuantity: TCaptionEdit [27]
[456]378 Left = 470
379 Top = 59
380 Width = 44
381 Height = 21
382 TabOrder = 6
383 OnChange = ControlChange
384 OnEnter = txtQuantityEnter
385 Caption = 'Quantity'
386 end
[829]387 object txtRefills: TCaptionEdit [28]
[456]388 Left = 470
389 Top = 105
390 Width = 31
391 Height = 21
392 TabOrder = 7
393 Text = '0'
394 OnChange = ControlChange
395 Caption = 'Refills'
396 end
[829]397 object spnRefills: TUpDown [29]
[456]398 Left = 501
399 Top = 105
400 Width = 15
401 Height = 21
402 Associate = txtRefills
403 Max = 11
404 TabOrder = 8
405 end
[829]406 object cmdComplex: TButton [30]
[456]407 Left = 202
408 Top = 18
409 Width = 106
410 Height = 21
411 Caption = 'Complex Dose...'
412 TabOrder = 17
413 OnClick = cmdComplexClick
414 end
[829]415 inherited cmdAccept: TButton
416 Top = 235
417 TabOrder = 13
418 ExplicitTop = 235
419 end
[456]420 inherited cmdQuit: TButton
421 Top = 262
422 TabOrder = 14
[829]423 ExplicitTop = 262
[456]424 end
425 inherited pnlMessage: TPanel
426 Left = 6
427 Top = 190
428 TabOrder = 16
[829]429 ExplicitLeft = 6
430 ExplicitTop = 190
[456]431 end
[829]432 inherited amgrMain: TVA508AccessibilityManager
433 Data = (
434 (
435 'Component = memComplex'
436 'Status = stsDefault')
437 (
438 'Component = txtSIG'
439 'Status = stsDefault')
440 (
441 'Component = cboDispense'
442 'Status = stsDefault')
443 (
444 'Component = cboMedication'
445 'Status = stsDefault')
446 (
447 'Component = cboRoute'
448 'Status = stsDefault')
449 (
450 'Component = cboSchedule'
451 'Status = stsDefault')
452 (
453 'Component = memComments'
454 'Status = stsDefault')
455 (
456 'Component = cboPriority'
457 'Status = stsDefault')
458 (
459 'Component = cboMedAlt'
460 'Status = stsDefault')
461 (
462 'Component = cboInstructions'
463 'Status = stsDefault')
464 (
465 'Component = cboPickup'
466 'Status = stsDefault')
467 (
468 'Component = cboSC'
469 'Status = stsDefault')
470 (
471 'Component = txtQuantity'
472 'Status = stsDefault')
473 (
474 'Component = txtRefills'
475 'Status = stsDefault')
476 (
477 'Component = spnRefills'
478 'Status = stsDefault')
479 (
480 'Component = cmdComplex'
481 'Status = stsDefault')
482 (
483 'Component = memOrder'
484 'Status = stsDefault')
485 (
486 'Component = cmdAccept'
487 'Status = stsDefault')
488 (
489 'Component = cmdQuit'
490 'Status = stsDefault')
491 (
492 'Component = pnlMessage'
493 'Status = stsDefault')
494 (
495 'Component = memMessage'
496 'Status = stsDefault')
497 (
498 'Component = frmODMedOut'
499 'Status = stsDefault'))
500 end
[456]501 object popUnits: TPopupMenu
502 AutoHotkeys = maManual
503 AutoPopup = False
504 Left = 271
505 Top = 76
506 end
507end
Note: See TracBrowser for help on using the repository browser.