Context Navigation

fLabs.dfm@ 1138

Last change on this file since 1138 was 830, checked in by Kevin Toppenberg, 14 years ago
Upgrading to version 27
File size: 29.5 KB

Line
1	inherited frmLabs: TfrmLabs
2	Left = 628
3	Top = 237
4	HelpContext = 8000
5	Caption = 'Laboratory Results Page'
6	ClientHeight = 701
7	HelpFile = 'qnoback'
8	OnDestroy = FormDestroy
9	ExplicitLeft = 628
10	ExplicitTop = 237
11	ExplicitWidth = 648
12	ExplicitHeight = 728
13	PixelsPerInch = 96
14	TextHeight = 13
15	inherited shpPageBottom: TShape
16	Top = 696
17	ExplicitTop = 355
18	end
19	inherited sptHorz: TSplitter
20	Height = 696
21	ExplicitHeight = 355
22	end
23	inherited pnlLeft: TPanel
24	Height = 696
25	ExplicitHeight = 696
26	object Splitter1: TSplitter
27	Left = 0
28	Top = 436
29	Width = 97
30	Height = 10
31	Cursor = crVSplit
32	Align = alBottom
33	Color = clBtnFace
34	ParentColor = False
35	OnCanResize = Splitter1CanResize
36	ExplicitLeft = -1
37	ExplicitTop = 263
38	end
39	object pnlLefTop: TPanel
40	Left = 0
41	Top = 0
42	Width = 97
43	Height = 436
44	Align = alClient
45	BevelOuter = bvNone
46	Constraints.MinWidth = 30
47	TabOrder = 0
48	object lblReports: TOROffsetLabel
49	Left = 0
50	Top = 0
51	Width = 97
52	Height = 19
53	Align = alTop
54	Caption = 'Lab Results'
55	HorzOffset = 2
56	Transparent = False
57	VertOffset = 6
58	WordWrap = False
59	ExplicitLeft = -41
60	ExplicitTop = 54
61	end
62	object tvReports: TORTreeView
63	Left = 0
64	Top = 19
65	Width = 97
66	Height = 417
67	Align = alClient
68	HideSelection = False
69	Indent = 18
70	ReadOnly = True
71	TabOrder = 0
72	OnClick = tvReportsClick
73	OnCollapsing = tvReportsCollapsing
74	OnExpanding = tvReportsExpanding
75	OnKeyDown = tvReportsKeyDown
76	Caption = 'Available Reports'
77	NodePiece = 0
78	end
79	end
80	object pnlLeftBottom: TPanel
81	Left = 0
82	Top = 446
83	Width = 97
84	Height = 250
85	Align = alBottom
86	TabOrder = 1
87	object lblQualifier: TOROffsetLabel
88	Left = 1
89	Top = 1
90	Width = 95
91	Height = 21
92	Align = alTop
93	HorzOffset = 3
94	Transparent = True
95	VertOffset = 4
96	Visible = False
97	WordWrap = False
98	ExplicitWidth = 98
99	end
100	object lblHeaders: TOROffsetLabel
101	Left = 1
102	Top = 120
103	Width = 95
104	Height = 17
105	Align = alTop
106	HorzOffset = 2
107	Transparent = False
108	VertOffset = 2
109	WordWrap = False
110	ExplicitTop = 185
111	ExplicitWidth = 97
112	end
113	object lblDates: TOROffsetLabel
114	Left = 1
115	Top = 105
116	Width = 95
117	Height = 15
118	Align = alTop
119	Caption = 'Date Range'
120	HorzOffset = 2
121	Transparent = False
122	VertOffset = 2
123	WordWrap = False
124	ExplicitLeft = 0
125	ExplicitTop = 69
126	end
127	object lstQualifier: TORListBox
128	Left = 1
129	Top = 137
130	Width = 95
131	Height = 112
132	Align = alClient
133	ItemHeight = 13
134	ParentShowHint = False
135	ShowHint = True
136	TabOrder = 0
137	Visible = False
138	OnClick = lstQualifierClick
139	ItemTipColor = clWindow
140	LongList = False
141	Pieces = '2,3'
142	TabPositions = '10'
143	end
144	object lstHeaders: TORListBox
145	Left = 1
146	Top = 55
147	Width = 95
148	Height = 50
149	Align = alTop
150	ItemHeight = 13
151	ParentShowHint = False
152	ShowHint = True
153	TabOrder = 1
154	Visible = False
155	OnClick = lstHeadersClick
156	Caption = 'Headings'
157	ItemTipColor = clWindow
158	LongList = False
159	Pieces = '2'
160	end
161	object lstDates: TORListBox
162	Left = 1
163	Top = 137
164	Width = 95
165	Height = 112
166	Align = alClient
167	ItemHeight = 13
168	Items.Strings = (
169	'S^Date Range...'
170	'1^Today'
171	'8^One Week'
172	'15^Two Weeks'
173	'31^One Month'
174	'183^Six Months'
175	'366^One Year'
176	'732^Two Years'
177	'50000^All Results')
178	ParentShowHint = False
179	ShowHint = True
180	TabOrder = 3
181	Visible = False
182	OnClick = lstDatesClick
183	Caption = 'Date Range'
184	ItemTipColor = clWindow
185	LongList = False
186	Pieces = '2'
187	end
188	object pnlOtherTests: TORAutoPanel
189	Left = 1
190	Top = 22
191	Width = 95
192	Height = 33
193	Align = alTop
194	BevelOuter = bvNone
195	TabOrder = 5
196	object bvlOtherTests: TBevel
197	Left = 3
198	Top = 31
199	Width = 90
200	Height = 2
201	end
202	object cmdOtherTests: TButton
203	Left = 11
204	Top = 4
205	Width = 75
206	Height = 25
207	Caption = 'Other Tests'
208	TabOrder = 0
209	OnClick = cmdOtherTestsClick
210	end
211	end
212	end
213	end
214	inherited pnlRight: TPanel
215	Height = 696
216	OnResize = pnlRightResize
217	ExplicitHeight = 696
218	object sptHorzRight: TSplitter
219	Left = 0
220	Top = 299
221	Width = 539
222	Height = 4
223	Cursor = crVSplit
224	Align = alTop
225	Visible = False
226	OnCanResize = sptHorzRightCanResize
227	OnMoved = sptHorzRightMoved
228	ExplicitTop = 288
229	end
230	object pnlRightBottom: TPanel
231	Left = 0
232	Top = 303
233	Width = 539
234	Height = 373
235	Align = alClient
236	TabOrder = 0
237	object Memo1: TMemo
238	Left = 1
239	Top = 1
240	Width = 537
241	Height = 19
242	Align = alTop
243	Font.Charset = DEFAULT_CHARSET
244	Font.Color = clWindowText
245	Font.Height = -11
246	Font.Name = 'Courier New'
247	Font.Style = []
248	Lines.Strings = (
249	'')
250	ParentFont = False
251	ScrollBars = ssVertical
252	TabOrder = 0
253	Visible = False
254	WantTabs = True
255	WordWrap = False
256	OnKeyUp = Memo1KeyUp
257	end
258	object memLab: TRichEdit
259	Left = 1
260	Top = 20
261	Width = 537
262	Height = 352
263	Align = alClient
264	Color = clCream
265	Font.Charset = DEFAULT_CHARSET
266	Font.Color = clWindowText
267	Font.Height = -11
268	Font.Name = 'Courier New'
269	Font.Style = []
270	ParentFont = False
271	PopupMenu = PopupMenu3
272	ReadOnly = True
273	ScrollBars = ssBoth
274	TabOrder = 1
275	Visible = False
276	WantReturns = False
277	WordWrap = False
278	end
279	end
280	object pnlRightTop: TPanel
281	Left = 0
282	Top = 25
283	Width = 539
284	Height = 274
285	Align = alTop
286	TabOrder = 1
287	object bvlHeader: TBevel
288	Left = 1
289	Top = 61
290	Width = 537
291	Height = 1
292	Align = alTop
293	ExplicitLeft = -8
294	ExplicitTop = 72
295	ExplicitWidth = 539
296	end
297	object pnlHeader: TORAutoPanel
298	Left = 1
299	Top = 1
300	Width = 537
301	Height = 60
302	Align = alTop
303	BevelOuter = bvNone
304	TabOrder = 0
305	object lblDateFloat: TLabel
306	Left = 396
307	Top = 4
308	Width = 56
309	Height = 13
310	Caption = 'lblDateFloat'
311	Visible = False
312	end
313	object pnlWorksheet: TORAutoPanel
314	Left = 0
315	Top = 0
316	Width = 537
317	Height = 60
318	Align = alClient
319	BevelOuter = bvNone
320	TabOrder = 1
321	object chkValues: TCheckBox
322	Left = 404
323	Top = 39
324	Width = 93
325	Height = 17
326	Caption = 'Values'
327	Enabled = False
328	TabOrder = 5
329	OnClick = chkValuesClick
330	end
331	object chk3D: TCheckBox
332	Left = 329
333	Top = 39
334	Width = 56
335	Height = 17
336	Caption = '3D'
337	Enabled = False
338	TabOrder = 4
339	OnClick = chk3DClick
340	end
341	object ragHorV: TRadioGroup
342	Left = 12
343	Top = 0
344	Width = 213
345	Height = 36
346	Caption = 'Table Format '
347	Columns = 2
348	ItemIndex = 0
349	Items.Strings = (
350	'&Horizontal'
351	'&Vertical')
352	TabOrder = 0
353	OnClick = ragHorVClick
354	end
355	object chkAbnormals: TCheckBox
356	Left = 12
357	Top = 39
358	Width = 221
359	Height = 17
360	Caption = 'Abnormal Results Only'
361	TabOrder = 2
362	OnClick = ragHorVClick
363	end
364	object ragCorG: TRadioGroup
365	Left = 252
366	Top = 0
367	Width = 213
368	Height = 36
369	Caption = 'Other Formats '
370	Columns = 2
371	ItemIndex = 0
372	Items.Strings = (
373	'&Comments'
374	'&Graph')
375	TabOrder = 1
376	OnClick = ragCorGClick
377	end
378	object chkZoom: TCheckBox
379	Left = 253
380	Top = 39
381	Width = 68
382	Height = 17
383	Caption = 'Zoom'
384	Enabled = False
385	TabOrder = 3
386	OnClick = chkZoomClick
387	end
388	end
389	object pnlGraph: TORAutoPanel
390	Left = 0
391	Top = 0
392	Width = 537
393	Height = 60
394	Align = alClient
395	BevelOuter = bvNone
396	TabOrder = 2
397	object lblGraphInfo: TLabel
398	Left = 0
399	Top = 47
400	Width = 537
401	Height = 13
402	Align = alBottom
403	Caption =
404	'To Zoom, hold down the mouse button while dragging an area to be' +
405	' enlarged.'
406	ExplicitWidth = 367
407	end
408	object chkGraph3D: TCheckBox
409	Left = 162
410	Top = 13
411	Width = 61
412	Height = 17
413	Caption = '3D'
414	TabOrder = 1
415	OnClick = chkGraph3DClick
416	end
417	object chkGraphValues: TCheckBox
418	Left = 276
419	Top = 13
420	Width = 101
421	Height = 17
422	Caption = 'Values'
423	TabOrder = 2
424	OnClick = chkGraphValuesClick
425	end
426	object chkGraphZoom: TCheckBox
427	Left = 48
428	Top = 13
429	Width = 97
430	Height = 17
431	Caption = 'Zoom'
432	TabOrder = 0
433	OnClick = chkGraphZoomClick
434	end
435	end
436	object pnlButtons: TORAutoPanel
437	Left = 0
438	Top = 0
439	Width = 537
440	Height = 60
441	Align = alClient
442	BevelOuter = bvNone
443	TabOrder = 0
444	object lblOld: TOROffsetLabel
445	Left = 4
446	Top = 6
447	Width = 41
448	Height = 15
449	Caption = 'Oldest'
450	HorzOffset = 2
451	Transparent = False
452	VertOffset = 2
453	WordWrap = False
454	end
455	object lblPrev: TOROffsetLabel
456	Left = 48
457	Top = 6
458	Width = 49
459	Height = 15
460	Caption = 'Previous'
461	HorzOffset = 2
462	Transparent = False
463	VertOffset = 2
464	WordWrap = False
465	end
466	object lblNext: TOROffsetLabel
467	Left = 246
468	Top = 6
469	Width = 31
470	Height = 15
471	Caption = 'Next'
472	HorzOffset = 2
473	Transparent = False
474	VertOffset = 2
475	WordWrap = False
476	end
477	object lblRecent: TOROffsetLabel
478	Left = 287
479	Top = 6
480	Width = 46
481	Height = 15
482	Caption = 'Newest'
483	HorzOffset = 2
484	Transparent = False
485	VertOffset = 2
486	WordWrap = False
487	end
488	object lblMostRecent: TLabel
489	Left = 368
490	Top = 29
491	Width = 144
492	Height = 13
493	Caption = 'Most Recent Lab Results'
494	Font.Charset = DEFAULT_CHARSET
495	Font.Color = clWindowText
496	Font.Height = -11
497	Font.Name = 'MS Sans Serif'
498	Font.Style = [fsBold]
499	ParentFont = False
500	end
501	object lblCollection: TLabel
502	Left = 100
503	Top = 8
504	Width = 44
505	Height = 13
506	Alignment = taCenter
507	Caption = 'Collecte&d'
508	FocusControl = lblDate
509	end
510	object lblDate: TVA508StaticText
511	Name = 'lblDate'
512	Left = 95
513	Top = 29
514	Width = 7
515	Height = 15
516	Alignment = taCenter
517	AutoSize = True
518	Font.Charset = DEFAULT_CHARSET
519	Font.Color = clWindowText
520	Font.Height = -11
521	Font.Name = 'MS Sans Serif'
522	Font.Style = [fsBold]
523	ParentFont = False
524	TabOrder = 0
525	OnEnter = lblDateEnter
526	ShowAccelChar = True
527	end
528	object cmdNext: TButton
529	Left = 238
530	Top = 23
531	Width = 45
532	Height = 25
533	Caption = '>'
534	Font.Charset = DEFAULT_CHARSET
535	Font.Color = clBtnText
536	Font.Height = -11
537	Font.Name = 'MS Sans Serif'
538	Font.Style = [fsBold]
539	ParentFont = False
540	TabOrder = 3
541	OnClick = cmdNextClick
542	end
543	object cmdPrev: TButton
544	Left = 49
545	Top = 23
546	Width = 45
547	Height = 25
548	Caption = '<'
549	Font.Charset = DEFAULT_CHARSET
550	Font.Color = clBtnText
551	Font.Height = -11
552	Font.Name = 'MS Sans Serif'
553	Font.Style = [fsBold]
554	ParentFont = False
555	TabOrder = 2
556	OnClick = cmdPrevClick
557	end
558	object cmdRecent: TButton
559	Left = 283
560	Top = 23
561	Width = 45
562	Height = 25
563	Caption = '>>'
564	Font.Charset = DEFAULT_CHARSET
565	Font.Color = clBtnText
566	Font.Height = -11
567	Font.Name = 'MS Sans Serif'
568	Font.Style = [fsBold]
569	ParentFont = False
570	TabOrder = 4
571	OnClick = cmdRecentClick
572	end
573	object cmdOld: TButton
574	Left = 4
575	Top = 23
576	Width = 45
577	Height = 25
578	Caption = '<<'
579	Font.Charset = DEFAULT_CHARSET
580	Font.Color = clBtnText
581	Font.Height = -11
582	Font.Name = 'MS Sans Serif'
583	Font.Style = [fsBold]
584	ParentFont = False
585	TabOrder = 1
586	OnClick = cmdOldClick
587	end
588	end
589	end
590	object TabControl1: TTabControl
591	Left = 1
592	Top = 62
593	Width = 537
594	Height = 16
595	Align = alTop
596	HotTrack = True
597	Style = tsButtons
598	TabHeight = 16
599	TabOrder = 1
600	Visible = False
601	OnChange = TabControl1Change
602	end
603	object grdLab: TCaptionStringGrid
604	Left = 1
605	Top = 78
606	Width = 537
607	Height = 33
608	Align = alTop
609	Color = clCream
610	DefaultRowHeight = 15
611	RowCount = 2
612	Font.Charset = DEFAULT_CHARSET
613	Font.Color = clWindowText
614	Font.Height = -11
615	Font.Name = 'MS Sans Serif'
616	Font.Style = []
617	Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
618	ParentFont = False
619	TabOrder = 2
620	Visible = False
621	Caption = 'Laboratory Results'
622	ColWidths = (
623	64
624	64
625	64
626	64
627	64)
628	RowHeights = (
629	15
630	15)
631	end
632	object pnlChart: TPanel
633	Left = 1
634	Top = 111
635	Width = 537
636	Height = 85
637	Align = alTop
638	BevelOuter = bvNone
639	Caption = 'no results to graph'
640	TabOrder = 3
641	Visible = False
642	object lblGraph: TLabel
643	Left = 0
644	Top = 72
645	Width = 370
646	Height = 13
647	Alignment = taCenter
648	Caption =
649	'Results may be available, but cannot be graphed. Please try an a' +
650	'lternate view.'
651	end
652	object lstTestGraph: TORListBox
653	Left = 0
654	Top = 0
655	Width = 97
656	Height = 85
657	Align = alLeft
658	ItemHeight = 13
659	ParentShowHint = False
660	ShowHint = True
661	TabOrder = 0
662	OnClick = lstTestGraphClick
663	Caption = 'Tests Graphed'
664	ItemTipColor = clWindow
665	LongList = False
666	Pieces = '2'
667	end
668	object chtChart: TChart
669	Left = 97
670	Top = 0
671	Width = 440
672	Height = 85
673	AllowPanning = pmNone
674	AllowZoom = False
675	BackWall.Brush.Color = clWhite
676	BackWall.Brush.Style = bsClear
677	Title.Text.Strings = (
678	'test name')
679	Title.Visible = False
680	OnClickLegend = chtChartClickLegend
681	OnClickSeries = chtChartClickSeries
682	OnUndoZoom = chtChartUndoZoom
683	LeftAxis.Title.Caption = 'units'
684	Legend.Alignment = laTop
685	Legend.Inverted = True
686	Legend.ShadowSize = 2
687	View3D = False
688	Align = alClient
689	BevelOuter = bvNone
690	Color = clSilver
691	PopupMenu = popChart
692	TabOrder = 1
693	OnMouseDown = chtChartMouseDown
694	object serHigh: TLineSeries
695	Marks.ArrowLength = 8
696	Marks.Visible = False
697	SeriesColor = clRed
698	Title = 'Ref High'
699	LinePen.Style = psDash
700	Pointer.InflateMargins = True
701	Pointer.Style = psRectangle
702	Pointer.Visible = False
703	XValues.DateTime = True
704	XValues.Name = 'X'
705	XValues.Multiplier = 1.000000000000000000
706	XValues.Order = loAscending
707	YValues.DateTime = False
708	YValues.Name = 'Y'
709	YValues.Multiplier = 1.000000000000000000
710	YValues.Order = loNone
711	end
712	object serLow: TLineSeries
713	Marks.ArrowLength = 8
714	Marks.Visible = False
715	SeriesColor = clRed
716	Title = 'Ref Low'
717	LinePen.Style = psDash
718	Pointer.InflateMargins = True
719	Pointer.Style = psRectangle
720	Pointer.Visible = False
721	XValues.DateTime = False
722	XValues.Name = 'X'
723	XValues.Multiplier = 1.000000000000000000
724	XValues.Order = loAscending
725	YValues.DateTime = False
726	YValues.Name = 'Y'
727	YValues.Multiplier = 1.000000000000000000
728	YValues.Order = loNone
729	end
730	object serTest: TLineSeries
731	Marks.ArrowLength = 8
732	Marks.Visible = False
733	SeriesColor = clBlue
734	Title = 'Lab Test'
735	Pointer.InflateMargins = True
736	Pointer.Style = psCircle
737	Pointer.Visible = True
738	XValues.DateTime = True
739	XValues.Name = 'X'
740	XValues.Multiplier = 1.000000000000000000
741	XValues.Order = loAscending
742	YValues.DateTime = False
743	YValues.Name = 'Y'
744	YValues.Multiplier = 1.000000000000000000
745	YValues.Order = loNone
746	end
747	end
748	end
749	object lvReports: TCaptionListView
750	Left = 1
751	Top = 196
752	Width = 537
753	Height = 77
754	Hint = 'To sort, click on column headers\|'
755	Align = alClient
756	Columns = <>
757	Constraints.MinHeight = 50
758	HideSelection = False
759	MultiSelect = True
760	ReadOnly = True
761	RowSelect = True
762	ParentShowHint = False
763	PopupMenu = PopupMenu2
764	ShowHint = True
765	TabOrder = 4
766	ViewStyle = vsReport
767	OnColumnClick = lvReportsColumnClick
768	OnCompare = lvReportsCompare
769	OnKeyUp = lvReportsKeyUp
770	OnSelectItem = lvReportsSelectItem
771	end
772	end
773	object pnlRightTopHeader: TPanel
774	Left = 0
775	Top = 0
776	Width = 539
777	Height = 25
778	Align = alTop
779	TabOrder = 2
780	object lblHeading: TOROffsetLabel
781	Left = 1
782	Top = 1
783	Width = 94
784	Height = 23
785	Align = alLeft
786	Caption = 'Laboratory Results'
787	HorzOffset = 2
788	Transparent = False
789	VertOffset = 6
790	WordWrap = False
791	ExplicitHeight = 39
792	end
793	object lblTitle: TOROffsetLabel
794	Left = 95
795	Top = 1
796	Width = 346
797	Height = 23
798	Align = alClient
799	HorzOffset = 3
800	Transparent = True
801	VertOffset = 6
802	WordWrap = False
803	ExplicitLeft = 80
804	ExplicitWidth = 369
805	ExplicitHeight = 39
806	end
807	object chkMaxFreq: TCheckBox
808	Left = 441
809	Top = 1
810	Width = 97
811	Height = 23
812	Align = alRight
813	Caption = 'Max/Site OFF'
814	TabOrder = 0
815	Visible = False
816	OnClick = chkMaxFreqClick
817	end
818	end
819	object pnlFooter: TORAutoPanel
820	Left = 0
821	Top = 676
822	Width = 539
823	Height = 20
824	Align = alBottom
825	TabOrder = 3
826	object lblSpecimen: TLabel
827	Left = 4
828	Top = 28
829	Width = 57
830	Height = 13
831	Caption = 'lblSpecimen'
832	Visible = False
833	end
834	object lblSingleTest: TLabel
835	Left = 88
836	Top = 28
837	Width = 60
838	Height = 13
839	Caption = 'lblSingleTest'
840	Visible = False
841	end
842	object lblFooter: TOROffsetLabel
843	Left = 1
844	Top = 1
845	Width = 537
846	Height = 25
847	Align = alTop
848	Caption =
849	' KEY: "L" = Abnormal Low, "H" = Abnormal High, "*" = Critical V' +
850	'alue'
851	HorzOffset = 2
852	Transparent = False
853	VertOffset = 2
854	WordWrap = False
855	ExplicitTop = 6
856	ExplicitWidth = 535
857	end
858	object lstTests: TORListBox
859	Left = 1
860	Top = 26
861	Width = 537
862	Height = 17
863	Align = alTop
864	ItemHeight = 13
865	ParentShowHint = False
866	ShowHint = True
867	TabOrder = 0
868	Visible = False
869	ItemTipColor = clWindow
870	LongList = False
871	end
872	end
873	end
874	inherited amgrMain: TVA508AccessibilityManager
875	Data = (
876	(
877	'Component = pnlLeft'
878	'Status = stsDefault')
879	(
880	'Component = pnlRight'
881	'Status = stsDefault')
882	(
883	'Component = frmLabs'
884	'Status = stsDefault')
885	(
886	'Component = pnlRightBottom'
887	'Status = stsDefault')
888	(
889	'Component = Memo1'
890	'Status = stsDefault')
891	(
892	'Component = memLab'
893	'Status = stsDefault')
894	(
895	'Component = pnlRightTop'
896	'Status = stsDefault')
897	(
898	'Component = pnlHeader'
899	'Status = stsDefault')
900	(
901	'Component = pnlWorksheet'
902	'Status = stsDefault')
903	(
904	'Component = chkValues'
905	'Status = stsDefault')
906	(
907	'Component = chk3D'
908	'Status = stsDefault')
909	(
910	'Component = ragHorV'
911	'Status = stsDefault')
912	(
913	'Component = chkAbnormals'
914	'Status = stsDefault')
915	(
916	'Component = ragCorG'
917	'Status = stsDefault')
918	(
919	'Component = chkZoom'
920	'Status = stsDefault')
921	(
922	'Component = pnlGraph'
923	'Status = stsDefault')
924	(
925	'Component = chkGraph3D'
926	'Status = stsDefault')
927	(
928	'Component = chkGraphValues'
929	'Status = stsDefault')
930	(
931	'Component = chkGraphZoom'
932	'Status = stsDefault')
933	(
934	'Component = pnlButtons'
935	'Status = stsDefault')
936	(
937	'Component = lblDate'
938	'Text = Date Collected'
939	'Status = stsOK')
940	(
941	'Component = cmdNext'
942	'Text = Next'
943	'Status = stsOK')
944	(
945	'Component = cmdPrev'
946	'Text = Previous'
947	'Status = stsOK')
948	(
949	'Component = cmdRecent'
950	'Text = Newest'
951	'Status = stsOK')
952	(
953	'Component = cmdOld'
954	'Text = Oldest'
955	'Status = stsOK')
956	(
957	'Component = TabControl1'
958	'Status = stsDefault')
959	(
960	'Component = grdLab'
961	'Status = stsDefault')
962	(
963	'Component = pnlChart'
964	'Status = stsDefault')
965	(
966	'Component = lstTestGraph'
967	'Status = stsDefault')
968	(
969	'Component = chtChart'
970	'Status = stsDefault')
971	(
972	'Component = pnlRightTopHeader'
973	'Status = stsDefault')
974	(
975	'Component = pnlFooter'
976	'Status = stsDefault')
977	(
978	'Component = lstTests'
979	'Status = stsDefault')
980	(
981	'Component = lvReports'
982	'Status = stsDefault')
983	(
984	'Component = pnlLefTop'
985	'Status = stsDefault')
986	(
987	'Component = tvReports'
988	'Status = stsDefault')
989	(
990	'Component = pnlLeftBottom'
991	'Status = stsDefault')
992	(
993	'Component = lstQualifier'
994	'Status = stsDefault')
995	(
996	'Component = lstHeaders'
997	'Status = stsDefault')
998	(
999	'Component = lstDates'
1000	'Status = stsDefault')
1001	(
1002	'Component = pnlOtherTests'
1003	'Status = stsDefault')
1004	(
1005	'Component = cmdOtherTests'
1006	'Status = stsDefault')
1007	(
1008	'Component = chkMaxFreq'
1009	'Status = stsDefault'))
1010	end
1011	object PopupMenu1: TPopupMenu
1012	OnPopup = PopupMenu1Popup
1013	Left = 5
1014	Top = 280
1015	object GotoTop1: TMenuItem
1016	Caption = 'Go to Top'
1017	Enabled = False
1018	OnClick = GotoTop1Click
1019	end
1020	object GotoBottom1: TMenuItem
1021	Caption = 'Go to Bottom'
1022	Enabled = False
1023	OnClick = GotoBottom1Click
1024	end
1025	object FreezeText1: TMenuItem
1026	Caption = 'Freeze Text'
1027	Enabled = False
1028	OnClick = FreezeText1Click
1029	end
1030	object UnfreezeText1: TMenuItem
1031	Caption = 'Un-freeze Text'
1032	Enabled = False
1033	OnClick = UnfreezeText1Click
1034	end
1035	end
1036	object popChart: TPopupMenu
1037	OnPopup = popChartPopup
1038	Left = 37
1039	Top = 277
1040	object popValues: TMenuItem
1041	Caption = 'Values'
1042	OnClick = popValuesClick
1043	end
1044	object pop3D: TMenuItem
1045	Caption = '3D'
1046	OnClick = pop3DClick
1047	end
1048	object popZoom: TMenuItem
1049	Caption = 'Zoom Enabled'
1050	OnClick = popZoomClick
1051	end
1052	object popZoomBack: TMenuItem
1053	Caption = 'Zoom Back'
1054	OnClick = popZoomBackClick
1055	end
1056	object N1: TMenuItem
1057	Caption = '-'
1058	end
1059	object popCopy: TMenuItem
1060	Caption = 'Copy'
1061	OnClick = popCopyClick
1062	end
1063	object N2: TMenuItem
1064	Caption = '-'
1065	end
1066	object popDetails: TMenuItem
1067	Caption = 'Details'
1068	OnClick = popDetailsClick
1069	end
1070	object N3: TMenuItem
1071	Caption = '-'
1072	end
1073	object popPrint: TMenuItem
1074	Caption = 'Print'
1075	OnClick = popPrintClick
1076	end
1077	end
1078	object calLabRange: TORDateRangeDlg
1079	DateOnly = True
1080	Instruction = 'Enter a date range -'
1081	LabelStart = 'Begin Date'
1082	LabelStop = 'End Date'
1083	RequireTime = False
1084	Format = 'mmm d,yy'
1085	Left = 66
1086	Top = 280
1087	end
1088	object dlgWinPrint: TPrintDialog
1089	Left = 610
1090	Top = 23
1091	end
1092	object Timer1: TTimer
1093	Interval = 100
1094	OnTimer = Timer1Timer
1095	Left = 253
1096	Top = 45
1097	end
1098	object PopupMenu2: TPopupMenu
1099	Left = 603
1100	Top = 158
1101	object Print1: TMenuItem
1102	Caption = 'Print'
1103	ShortCut = 16464
1104	OnClick = Print1Click
1105	end
1106	object Copy1: TMenuItem
1107	Caption = 'Copy Data From Table'
1108	ShortCut = 16451
1109	OnClick = Copy1Click
1110	end
1111	object SelectAll1: TMenuItem
1112	Caption = 'Select All From Table'
1113	ShortCut = 16449
1114	OnClick = SelectAll1Click
1115	end
1116	end
1117	object PopupMenu3: TPopupMenu
1118	OnPopup = PopupMenu1Popup
1119	Left = 605
1120	Top = 200
1121	object Print2: TMenuItem
1122	Caption = 'Print'
1123	ShortCut = 16464
1124	OnClick = Print2Click
1125	end
1126	object Copy2: TMenuItem
1127	Caption = 'Copy'
1128	ShortCut = 16451
1129	OnClick = Copy2Click
1130	end
1131	object SelectAll2: TMenuItem
1132	Caption = 'Select All'
1133	ShortCut = 16449
1134	OnClick = SelectAll2Click
1135	end
1136	object MenuItem1: TMenuItem
1137	Caption = 'Go to Top'
1138	Enabled = False
1139	OnClick = GotoTop1Click
1140	end
1141	object MenuItem2: TMenuItem
1142	Caption = 'Go to Bottom'
1143	OnClick = GotoBottom1Click
1144	end
1145	object MenuItem3: TMenuItem
1146	Caption = 'Freeze Text'
1147	Enabled = False
1148	OnClick = FreezeText1Click
1149	end
1150	object MenuItem4: TMenuItem
1151	Caption = 'Un-Freeze Text'
1152	Enabled = False
1153	OnClick = UnfreezeText1Click
1154	end
1155	end
1156	end

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

Download in other formats:

Original Format