Context Navigation

fODMedIV.dfm@ 1722

Last change on this file since 1722 was 1693, checked in by healthsevak, 9 years ago
Committing the files for first time to this new branch
File size: 15.0 KB

Line
1	inherited frmODMedIV: TfrmODMedIV
2	Left = 246
3	Top = 256
4	Width = 668
5	Height = 465
6	Caption = 'Infusion Order'
7	Constraints.MinHeight = 360
8	Constraints.MinWidth = 500
9	ExplicitWidth = 668
10	ExplicitHeight = 465
11	PixelsPerInch = 96
12	TextHeight = 13
13	object lblInfusionRate: TLabel [0]
14	Left = 486
15	Top = 197
16	Width = 100
17	Height = 13
18	Caption = 'Infusion Rate (ml/hr)*'
19	end
20	object lblPriority: TLabel [1]
21	Left = 8
22	Top = 238
23	Width = 35
24	Height = 13
25	Caption = 'Priority*'
26	end
27	object lblComponent: TLabel [2]
28	Left = 214
29	Top = 6
30	Width = 85
31	Height = 13
32	Caption = 'Solution/Additive*'
33	end
34	object lblAmount: TLabel [3]
35	Left = 328
36	Top = 6
37	Width = 84
38	Height = 13
39	Caption = 'Volume/Strength*'
40	WordWrap = True
41	end
42	object lblComments: TLabel [4]
43	Left = 214
44	Top = 107
45	Width = 49
46	Height = 13
47	Caption = 'Comments'
48	end
49	object lblLimit: TLabel [5]
50	Left = 185
51	Top = 238
52	Width = 165
53	Height = 13
54	Caption = 'Duration or Total Volume (Optional)'
55	end
56	object Label1: TLabel [6]
57	Left = 10
58	Top = 345
59	Width = 44
60	Height = 13
61	Caption = 'Order Sig'
62	end
63	object lblRoute: TLabel [7]
64	Left = 8
65	Top = 197
66	Width = 33
67	Height = 13
68	Caption = 'Route*'
69	end
70	object lblSchedule: TLabel [8]
71	Left = 304
72	Top = 197
73	Width = 52
74	Height = 13
75	Caption = 'Schedule *'
76	end
77	object lblType: TLabel [9]
78	Left = 184
79	Top = 197
80	Width = 28
81	Height = 13
82	Caption = 'Type*'
83	ParentShowHint = False
84	ShowHint = True
85	end
86	object txtNSS: TLabel [10]
87	Left = 361
88	Top = 197
89	Width = 69
90	Height = 13
91	Caption = '(Day-of-Week)'
92	Color = clBtnFace
93	Font.Charset = DEFAULT_CHARSET
94	Font.Color = clBlue
95	Font.Height = -11
96	Font.Name = 'MS Sans Serif'
97	Font.Style = []
98	ParentColor = False
99	ParentFont = False
100	OnClick = txtNSSClick
101	end
102	object txtAllIVRoutes: TLabel [11]
103	Left = 47
104	Top = 197
105	Width = 129
106	Height = 13
107	Caption = '(Expanded Med Route List)'
108	Font.Charset = DEFAULT_CHARSET
109	Font.Color = clBlue
110	Font.Height = -11
111	Font.Name = 'MS Sans Serif'
112	Font.Style = []
113	ParentFont = False
114	Visible = False
115	OnClick = txtAllIVRoutesClick
116	end
117	object lblTypeHelp: TLabel [12]
118	Left = 219
119	Top = 197
120	Width = 68
121	Height = 13
122	Caption = '(IV Type Help)'
123	Font.Charset = DEFAULT_CHARSET
124	Font.Color = clBlue
125	Font.Height = -11
126	Font.Name = 'MS Sans Serif'
127	Font.Style = []
128	ParentFont = False
129	ParentShowHint = False
130	ShowHint = False
131	OnClick = lblTypeHelpClick
132	end
133	object lblAddFreq: TLabel [13]
134	Left = 488
135	Top = 6
136	Width = 95
137	Height = 13
138	Caption = 'Additive Frequency*'
139	end
140	object lblPrevAddFreq: TLabel [14]
141	Left = 557
142	Top = 6
143	Width = 77
144	Height = 13
145	Caption = 'Prev. Add. Freq.'
146	end
147	object txtRate: TCaptionEdit [15]
148	Left = 486
149	Top = 211
150	Width = 91
151	Height = 21
152	AutoSelect = False
153	TabOrder = 10
154	OnChange = txtRateChange
155	Caption = 'Infusion Rate'
156	end
157	object cboPriority: TORComboBox [16]
158	Left = 8
159	Top = 252
160	Width = 72
161	Height = 21
162	Style = orcsDropDown
163	AutoSelect = True
164	Caption = 'Priority'
165	Color = clWindow
166	DropDownCount = 8
167	ItemHeight = 13
168	ItemTipColor = clWindow
169	ItemTipEnable = True
170	ListItemsOnly = False
171	LongList = False
172	LookupPiece = 0
173	MaxLength = 0
174	Pieces = '2'
175	Sorted = False
176	SynonymChars = '<>'
177	TabOrder = 12
178	OnChange = cboPriorityChange
179	OnExit = cboPriorityExit
180	OnKeyUp = cboPriorityKeyUp
181	CharsNeedMatch = 1
182	end
183	object grdSelected: TCaptionStringGrid [17]
184	Left = 215
185	Top = 18
186	Width = 437
187	Height = 76
188	DefaultColWidth = 100
189	DefaultRowHeight = 19
190	DefaultDrawing = False
191	FixedCols = 0
192	RowCount = 1
193	FixedRows = 0
194	Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected]
195	ScrollBars = ssVertical
196	TabOrder = 2
197	OnDrawCell = grdSelectedDrawCell
198	OnKeyPress = grdSelectedKeyPress
199	OnMouseDown = grdSelectedMouseDown
200	end
201	object cmdRemove: TButton [18]
202	Left = 443
203	Top = 100
204	Width = 72
205	Height = 18
206	Caption = 'Remove'
207	TabOrder = 3
208	OnClick = cmdRemoveClick
209	end
210	object memComments: TCaptionMemo [19]
211	Left = 214
212	Top = 121
213	Width = 437
214	Height = 66
215	Lines.Strings = (
216	'memComments')
217	ScrollBars = ssVertical
218	TabOrder = 4
219	OnChange = ControlChange
220	Caption = 'Comments'
221	end
222	object txtSelected: TCaptionEdit [20]
223	Tag = -1
224	Left = 416
225	Top = 45
226	Width = 45
227	Height = 19
228	Ctl3D = False
229	ParentCtl3D = False
230	TabOrder = 0
231	Text = 'meq.'
232	Visible = False
233	OnChange = txtSelectedChange
234	OnExit = txtSelectedExit
235	OnKeyDown = txtSelectedKeyDown
236	Caption = 'Volume'
237	end
238	object cboSelected: TCaptionComboBox [21]
239	Tag = -1
240	Left = 462
241	Top = 45
242	Width = 53
243	Height = 21
244	Style = csDropDownList
245	Ctl3D = False
246	ItemHeight = 13
247	ParentCtl3D = False
248	TabOrder = 6
249	Visible = False
250	OnCloseUp = cboSelectedCloseUp
251	OnKeyDown = cboSelectedKeyDown
252	Caption = 'Volume/Strength'
253	end
254	inherited memOrder: TCaptionMemo
255	Top = 364
256	Width = 475
257	TabOrder = 17
258	ExplicitTop = 364
259	ExplicitWidth = 475
260	end
261	object pnlXDuration: TPanel [23]
262	Left = 184
263	Top = 252
264	Width = 150
265	Height = 21
266	BevelOuter = bvNone
267	TabOrder = 13
268	OnEnter = pnlXDurationEnter
269	object txtXDuration: TCaptionEdit
270	Left = 0
271	Top = 0
272	Width = 68
273	Height = 21
274	TabOrder = 0
275	OnChange = txtXDurationChange
276	OnExit = txtXDurationExit
277	end
278	object cboDuration: TComboBox
279	Left = 70
280	Top = 0
281	Width = 75
282	Height = 21
283	ItemHeight = 13
284	TabOrder = 1
285	OnChange = cboDurationChange
286	OnEnter = cboDurationEnter
287	end
288	end
289	object pnlCombo: TPanel [24]
290	Left = 8
291	Top = 2
292	Width = 200
293	Height = 185
294	BevelOuter = bvNone
295	TabOrder = 26
296	object cboAdditive: TORComboBox
297	Left = 0
298	Top = 20
299	Width = 200
300	Height = 165
301	Style = orcsSimple
302	Align = alClient
303	AutoSelect = True
304	Caption = 'Additives'
305	Color = clWindow
306	DropDownCount = 11
307	ItemHeight = 13
308	ItemTipColor = clWindow
309	ItemTipEnable = True
310	ListItemsOnly = True
311	LongList = True
312	LookupPiece = 0
313	MaxLength = 0
314	Pieces = '2'
315	Sorted = False
316	SynonymChars = '<>'
317	TabPositions = '20'
318	TabOrder = 1
319	OnExit = cboAdditiveExit
320	OnMouseClick = cboAdditiveMouseClick
321	OnNeedData = cboAdditiveNeedData
322	CharsNeedMatch = 1
323	end
324	object tabFluid: TTabControl
325	Left = 0
326	Top = 0
327	Width = 200
328	Height = 20
329	Align = alTop
330	TabHeight = 15
331	TabOrder = 2
332	Tabs.Strings = (
333	' Solutions '
334	' Additives ')
335	TabIndex = 0
336	OnChange = tabFluidChange
337	end
338	object cboSolution: TORComboBox
339	Left = 0
340	Top = 20
341	Width = 200
342	Height = 165
343	Style = orcsSimple
344	Align = alClient
345	AutoSelect = True
346	Caption = 'Solutions'
347	Color = clWindow
348	DropDownCount = 11
349	ItemHeight = 13
350	ItemTipColor = clWindow
351	ItemTipEnable = True
352	ListItemsOnly = True
353	LongList = True
354	LookupPiece = 0
355	MaxLength = 0
356	Pieces = '2'
357	Sorted = False
358	SynonymChars = '<>'
359	TabPositions = '20'
360	TabOrder = 0
361	OnExit = cboSolutionExit
362	OnMouseClick = cboSolutionMouseClick
363	OnNeedData = cboSolutionNeedData
364	CharsNeedMatch = 1
365	end
366	end
367	object cboRoute: TORComboBox [25]
368	Left = 8
369	Top = 211
370	Width = 168
371	Height = 21
372	Style = orcsDropDown
373	AutoSelect = True
374	Color = clWindow
375	DropDownCount = 8
376	ItemHeight = 13
377	ItemTipColor = clWindow
378	ItemTipEnable = True
379	ListItemsOnly = False
380	LongList = False
381	LookupPiece = 0
382	MaxLength = 0
383	Pieces = '2'
384	Sorted = False
385	SynonymChars = '<>'
386	TabOrder = 5
387	OnChange = cboRouteChange
388	OnClick = cboRouteClick
389	OnExit = cboRouteExit
390	OnKeyDown = cboRouteKeyDown
391	OnKeyUp = cboRouteKeyUp
392	CharsNeedMatch = 1
393	UniqueAutoComplete = True
394	end
395	object cboSchedule: TORComboBox [26]
396	Left = 304
397	Top = 211
398	Width = 129
399	Height = 21
400	Style = orcsDropDown
401	AutoSelect = True
402	Color = clWindow
403	DropDownCount = 8
404	ItemHeight = 13
405	ItemTipColor = clWindow
406	ItemTipEnable = True
407	ListItemsOnly = False
408	LongList = False
409	LookupPiece = 1
410	MaxLength = 0
411	Pieces = '1'
412	Sorted = True
413	SynonymChars = '<>'
414	TabOrder = 8
415	OnChange = cboScheduleChange
416	OnClick = cboScheduleClick
417	OnExit = cboScheduleExit
418	OnKeyDown = cboScheduleKeyDown
419	OnKeyUp = cboScheduleKeyUp
420	CharsNeedMatch = 1
421	UniqueAutoComplete = True
422	end
423	object cboType: TComboBox [27]
424	Left = 184
425	Top = 211
426	Width = 114
427	Height = 21
428	ItemHeight = 13
429	ParentShowHint = False
430	ShowHint = True
431	TabOrder = 7
432	OnChange = cboTypeChange
433	OnKeyDown = cboTypeKeyDown
434	end
435	object chkPRN: TCheckBox [28]
436	Left = 436
437	Top = 213
438	Width = 45
439	Height = 21
440	Caption = 'PRN'
441	TabOrder = 9
442	OnClick = chkPRNClick
443	end
444	object chkDoseNow: TCheckBox [29]
445	Left = 8
446	Top = 279
447	Width = 147
448	Height = 17
449	Anchors = [akLeft]
450	Caption = 'Give Additional Dose Now'
451	Constraints.MinWidth = 147
452	TabOrder = 14
453	OnClick = chkDoseNowClick
454	end
455	object cboInfusionTime: TComboBox [30]
456	Left = 576
457	Top = 211
458	Width = 74
459	Height = 21
460	ItemHeight = 13
461	TabOrder = 11
462	OnChange = cboInfusionTimeChange
463	OnEnter = cboInfusionTimeEnter
464	end
465	object lblAdminTime: TVA508StaticText [31]
466	Name = 'lblAdminTime'
467	Left = 8
468	Top = 308
469	Width = 4
470	Height = 4
471	Alignment = taLeftJustify
472	ParentShowHint = False
473	ShowHint = True
474	TabOrder = 15
475	TabStop = True
476	Visible = False
477	ShowAccelChar = True
478	end
479	object lblFirstDose: TVA508StaticText [32]
480	Name = 'lblFirstDose'
481	Left = 8
482	Top = 323
483	Width = 4
484	Height = 4
485	Alignment = taLeftJustify
486	TabOrder = 16
487	TabStop = True
488	Visible = False
489	ShowAccelChar = True
490	end
491	object cboAddFreq: TCaptionComboBox [33]
492	Left = 488
493	Top = 72
494	Width = 145
495	Height = 21
496	ItemHeight = 13
497	TabOrder = 25
498	Visible = False
499	OnCloseUp = cboAddFreqCloseUp
500	OnKeyDown = cboAddFreqKeyDown
501	end
502	inherited cmdAccept: TButton
503	Left = 495
504	Top = 364
505	TabOrder = 18
506	ExplicitLeft = 495
507	ExplicitTop = 364
508	end
509	inherited cmdQuit: TButton
510	Left = 495
511	Top = 391
512	TabOrder = 19
513	ExplicitLeft = 495
514	ExplicitTop = 391
515	end
516	inherited pnlMessage: TPanel
517	Left = 56
518	Top = 341
519	TabOrder = 20
520	ExplicitLeft = 56
521	ExplicitTop = 341
522	end
523	object lbl508Required: TVA508StaticText [37]
524	Name = 'lbl508Required'
525	Left = 6
526	Top = 318
527	Width = 135
528	Height = 15
529	Alignment = taLeftJustify
530	Caption = ' * Indicates a Required Field'
531	TabOrder = 1
532	ShowAccelChar = True
533	end
534	inherited amgrMain: TVA508AccessibilityManager
535	Data = (
536	(
537	'Component = txtRate'
538	'Label = lblInfusionRate'
539	'Status = stsOK')
540	(
541	'Component = cboPriority'
542	'Label = lblPriority'
543	'Status = stsOK')
544	(
545	'Component = grdSelected'
546	'Status = stsDefault')
547	(
548	'Component = cmdRemove'
549	'Status = stsDefault')
550	(
551	'Component = memComments'
552	'Status = stsDefault')
553	(
554	'Component = txtSelected'
555	'Status = stsDefault')
556	(
557	'Component = cboSelected'
558	'Status = stsDefault')
559	(
560	'Component = pnlXDuration'
561	'Status = stsDefault')
562	(
563	'Component = txtXDuration'
564	'Label = lblLimit'
565	'Status = stsOK')
566	(
567	'Component = pnlCombo'
568	'Status = stsDefault')
569	(
570	'Component = cboAdditive'
571	'Status = stsDefault')
572	(
573	'Component = tabFluid'
574	'Status = stsDefault')
575	(
576	'Component = cboSolution'
577	'Status = stsDefault')
578	(
579	'Component = cboRoute'
580	'Label = lblRoute'
581	'Status = stsOK')
582	(
583	'Component = cboSchedule'
584	'Label = lblSchedule'
585	'Status = stsOK')
586	(
587	'Component = cboType'
588	'Label = lblType'
589	'Status = stsOK')
590	(
591	'Component = chkPRN'
592	'Status = stsDefault')
593	(
594	'Component = chkDoseNow'
595	'Status = stsDefault')
596	(
597	'Component = memOrder'
598	'Label = Label1'
599	'Status = stsOK')
600	(
601	'Component = cmdAccept'
602	'Status = stsDefault')
603	(
604	'Component = cmdQuit'
605	'Status = stsDefault')
606	(
607	'Component = pnlMessage'
608	'Status = stsDefault')
609	(
610	'Component = memMessage'
611	'Status = stsDefault')
612	(
613	'Component = frmODMedIV'
614	'Status = stsDefault')
615	(
616	'Component = cboInfusionTime'
617	'Text = Infusion Rate Time'
618	'Status = stsOK')
619	(
620	'Component = cboDuration'
621	'Text = Duration/Volume Units'
622	'Status = stsOK')
623	(
624	'Component = lblAdminTime'
625	'Status = stsDefault')
626	(
627	'Component = lblFirstDose'
628	'Status = stsDefault')
629	(
630	'Component = cboAddFreq'
631	'Status = stsDefault')
632	(
633	'Component = lbl508Required'
634	'Status = stsDefault'))
635	end
636	object VA508CompOrderSig: TVA508ComponentAccessibility
637	Component = memOrder
638	OnStateQuery = VA508CompOrderSigStateQuery
639	Left = 24
640	Top = 368
641	end
642	object VA508CompRoute: TVA508ComponentAccessibility
643	Component = cboRoute
644	OnInstructionsQuery = VA508CompRouteInstructionsQuery
645	Left = 104
646	Top = 240
647	end
648	object VA508CompType: TVA508ComponentAccessibility
649	Component = cboType
650	OnInstructionsQuery = VA508CompTypeInstructionsQuery
651	Left = 224
652	Top = 280
653	end
654	object VA508CompSchedule: TVA508ComponentAccessibility
655	Component = cboSchedule
656	OnInstructionsQuery = VA508CompScheduleInstructionsQuery
657	Left = 384
658	Top = 240
659	end
660	object VA508CompGrdSelected: TVA508ComponentAccessibility
661	Component = grdSelected
662	OnCaptionQuery = VA508CompGrdSelectedCaptionQuery
663	Left = 288
664	Top = 64
665	end
666	end

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format