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