source: cprs/branches/tmg-cprs/CPRS-Chart/fLabs.dfm@ 710

Last change on this file since 710 was 453, checked in by Kevin Toppenberg, 16 years ago

Initial upload of TMG-CPRS 1.0.26.69
File size: 24.6 KB
RevLine 
[453]1inherited frmLabs: TfrmLabs
2 Left = 250
3 Top = 230
4 Height = 387
5 HelpContext = 8000
6 Caption = 'Laboratory Results Page'
7 HelpFile = 'qnoback'
8 OnDestroy = FormDestroy
9 PixelsPerInch = 96
10 TextHeight = 13
11 inherited shpPageBottom: TShape
12 Top = 348
13 end
14 inherited sptHorz: TSplitter
15 Height = 348
16 end
17 inherited pnlLeft: TPanel
18 Height = 348
19 object lblReports: TOROffsetLabel
20 Left = 0
21 Top = 0
22 Width = 97
23 Height = 19
24 Align = alTop
25 Caption = 'Lab Results'
26 HorzOffset = 2
27 Transparent = False
28 VertOffset = 6
29 WordWrap = False
30 end
31 object lblDates: TOROffsetLabel
32 Left = 0
33 Top = 225
34 Width = 97
35 Height = 15
36 Align = alBottom
37 Caption = 'Date Range'
38 HorzOffset = 2
39 Transparent = False
40 VertOffset = 2
41 WordWrap = False
42 end
43 object lblHeaders: TOROffsetLabel
44 Left = 0
45 Top = 125
46 Width = 97
47 Height = 15
48 Align = alBottom
49 Caption = 'Headings'
50 HorzOffset = 2
51 Transparent = False
52 VertOffset = 2
53 WordWrap = False
54 end
55 object lstReports: TORListBox
56 Left = 0
57 Top = 19
58 Width = 97
59 Height = 106
60 Align = alClient
61 ItemHeight = 13
62 ParentShowHint = False
63 ShowHint = True
64 TabOrder = 0
65 OnClick = lstReportsClick
66 Caption = 'Lab Results'
67 ItemTipColor = clWindow
68 LongList = False
69 Pieces = '2'
70 end
71 object lstHeaders: TORListBox
72 Left = 0
73 Top = 140
74 Width = 97
75 Height = 52
76 Align = alBottom
77 ItemHeight = 13
78 ParentShowHint = False
79 ShowHint = True
80 TabOrder = 1
81 Visible = False
82 OnClick = lstHeadersClick
83 Caption = 'Headings'
84 ItemTipColor = clWindow
85 LongList = False
86 Pieces = '2'
87 end
88 object lstDates: TORListBox
89 Left = 0
90 Top = 240
91 Width = 97
92 Height = 108
93 Align = alBottom
94 ItemHeight = 13
95 Items.Strings = (
96 'S^Date Range...'
97 '1^Today'
98 '8^One Week'
99 '15^Two Weeks'
100 '31^One Month'
101 '183^Six Months'
102 '366^One Year'
103 '732^Two Years'
104 '66666^All Results')
105 ParentShowHint = False
106 ShowHint = True
107 TabOrder = 3
108 Visible = False
109 OnClick = lstDatesClick
110 Caption = 'Date Range'
111 ItemTipColor = clWindow
112 LongList = False
113 Pieces = '2'
114 end
115 object pnlOtherTests: TORAutoPanel
116 Left = 0
117 Top = 192
118 Width = 97
119 Height = 33
120 Align = alBottom
121 BevelOuter = bvNone
122 TabOrder = 2
123 object bvlOtherTests: TBevel
124 Left = 3
125 Top = 31
126 Width = 90
127 Height = 2
128 end
129 object cmdOtherTests: TButton
130 Left = 11
131 Top = 4
132 Width = 75
133 Height = 25
134 Caption = 'Other Tests'
135 TabOrder = 0
136 OnClick = cmdOtherTestsClick
137 end
138 end
139 end
140 inherited pnlRight: TPanel
141 Height = 348
142 OnResize = pnlRightResize
143 object lblHeading: TOROffsetLabel
144 Left = 0
145 Top = 0
146 Width = 539
147 Height = 19
148 Align = alTop
149 Caption = 'Laboratory Results'
150 HorzOffset = 2
151 Transparent = False
152 VertOffset = 6
153 WordWrap = False
154 end
155 object pnlHeader: TORAutoPanel
156 Left = 0
157 Top = 19
158 Width = 539
159 Height = 60
160 Align = alTop
161 BevelOuter = bvNone
162 TabOrder = 0
163 object bvlHeader: TBevel
164 Left = 0
165 Top = 0
166 Width = 539
167 Height = 2
168 Align = alTop
169 end
170 object lblDateFloat: TLabel
171 Left = 396
172 Top = 4
173 Width = 56
174 Height = 13
175 Caption = 'lblDateFloat'
176 Visible = False
177 end
178 object pnlWorksheet: TORAutoPanel
179 Left = 0
180 Top = 2
181 Width = 539
182 Height = 58
183 Align = alClient
184 BevelOuter = bvNone
185 TabOrder = 1
186 object chkValues: TCheckBox
187 Left = 404
188 Top = 39
189 Width = 93
190 Height = 17
191 Caption = 'Values'
192 Enabled = False
193 TabOrder = 5
194 OnClick = chkValuesClick
195 end
196 object chk3D: TCheckBox
197 Left = 329
198 Top = 39
199 Width = 56
200 Height = 17
201 Caption = '3D'
202 Enabled = False
203 TabOrder = 4
204 OnClick = chk3DClick
205 end
206 object ragHorV: TRadioGroup
207 Left = 12
208 Top = 0
209 Width = 213
210 Height = 36
211 Caption = 'Table Format '
212 Columns = 2
213 ItemIndex = 0
214 Items.Strings = (
215 '&Horizontal'
216 '&Vertical')
217 TabOrder = 0
218 OnClick = ragHorVClick
219 end
220 object chkAbnormals: TCheckBox
221 Left = 12
222 Top = 39
223 Width = 221
224 Height = 17
225 Caption = 'Abnormal Results Only'
226 TabOrder = 2
227 OnClick = ragHorVClick
228 end
229 object ragCorG: TRadioGroup
230 Left = 252
231 Top = 0
232 Width = 213
233 Height = 36
234 Caption = 'Other Formats '
235 Columns = 2
236 ItemIndex = 0
237 Items.Strings = (
238 '&Comments'
239 '&Graph')
240 TabOrder = 1
241 OnClick = ragCorGClick
242 end
243 object chkZoom: TCheckBox
244 Left = 253
245 Top = 39
246 Width = 68
247 Height = 17
248 Caption = 'Zoom'
249 Enabled = False
250 TabOrder = 3
251 OnClick = chkZoomClick
252 end
253 end
254 object pnlGraph: TORAutoPanel
255 Left = 0
256 Top = 2
257 Width = 539
258 Height = 58
259 Align = alClient
260 BevelOuter = bvNone
261 TabOrder = 2
262 object lblGraphInfo: TLabel
263 Left = 0
264 Top = 45
265 Width = 539
266 Height = 13
267 Align = alBottom
268 Caption =
269 'To Zoom, hold down the mouse button while dragging an area to be' +
270 ' enlarged.'
271 end
272 object chkGraph3D: TCheckBox
273 Left = 162
274 Top = 13
275 Width = 61
276 Height = 17
277 Caption = '3D'
278 TabOrder = 1
279 OnClick = chkGraph3DClick
280 end
281 object chkGraphValues: TCheckBox
282 Left = 276
283 Top = 13
284 Width = 101
285 Height = 17
286 Caption = 'Values'
287 TabOrder = 2
288 OnClick = chkGraphValuesClick
289 end
290 object chkGraphZoom: TCheckBox
291 Left = 48
292 Top = 13
293 Width = 97
294 Height = 17
295 Caption = 'Zoom'
296 TabOrder = 0
297 OnClick = chkGraphZoomClick
298 end
299 end
300 object pnlButtons: TORAutoPanel
301 Left = 0
302 Top = 2
303 Width = 539
304 Height = 58
305 Align = alClient
306 BevelOuter = bvNone
307 TabOrder = 0
308 object lblOld: TOROffsetLabel
309 Left = 4
310 Top = 6
311 Width = 41
312 Height = 15
313 Caption = 'Oldest'
314 HorzOffset = 2
315 Transparent = False
316 VertOffset = 2
317 WordWrap = False
318 end
319 object lblPrev: TOROffsetLabel
320 Left = 48
321 Top = 6
322 Width = 49
323 Height = 15
324 Caption = 'Previous'
325 HorzOffset = 2
326 Transparent = False
327 VertOffset = 2
328 WordWrap = False
329 end
330 object lblNext: TOROffsetLabel
331 Left = 246
332 Top = 6
333 Width = 31
334 Height = 15
335 Caption = 'Next'
336 HorzOffset = 2
337 Transparent = False
338 VertOffset = 2
339 WordWrap = False
340 end
341 object lblRecent: TOROffsetLabel
342 Left = 287
343 Top = 6
344 Width = 46
345 Height = 15
346 Caption = 'Newest'
347 HorzOffset = 2
348 Transparent = False
349 VertOffset = 2
350 WordWrap = False
351 end
352 object lblMostRecent: TLabel
353 Left = 368
354 Top = 29
355 Width = 144
356 Height = 13
357 Caption = 'Most Recent Lab Results'
358 Font.Charset = DEFAULT_CHARSET
359 Font.Color = clWindowText
360 Font.Height = -11
361 Font.Name = 'MS Sans Serif'
362 Font.Style = [fsBold]
363 ParentFont = False
364 end
365 object lblDate: TLabel
366 Left = 95
367 Top = 29
368 Width = 5
369 Height = 13
370 Alignment = taCenter
371 Font.Charset = DEFAULT_CHARSET
372 Font.Color = clWindowText
373 Font.Height = -11
374 Font.Name = 'MS Sans Serif'
375 Font.Style = [fsBold]
376 ParentFont = False
377 end
378 object lblCollection: TLabel
379 Left = 95
380 Top = 8
381 Width = 44
382 Height = 13
383 Alignment = taCenter
384 Caption = 'Collected'
385 end
386 object cmdNext: TButton
387 Left = 238
388 Top = 23
389 Width = 45
390 Height = 25
391 Caption = '>'
392 Font.Charset = DEFAULT_CHARSET
393 Font.Color = clBtnText
394 Font.Height = -11
395 Font.Name = 'MS Sans Serif'
396 Font.Style = [fsBold]
397 ParentFont = False
398 TabOrder = 2
399 OnClick = cmdNextClick
400 end
401 object cmdPrev: TButton
402 Left = 49
403 Top = 23
404 Width = 45
405 Height = 25
406 Caption = '<'
407 Font.Charset = DEFAULT_CHARSET
408 Font.Color = clBtnText
409 Font.Height = -11
410 Font.Name = 'MS Sans Serif'
411 Font.Style = [fsBold]
412 ParentFont = False
413 TabOrder = 1
414 OnClick = cmdPrevClick
415 end
416 object cmdRecent: TButton
417 Left = 283
418 Top = 23
419 Width = 45
420 Height = 25
421 Caption = '>>'
422 Font.Charset = DEFAULT_CHARSET
423 Font.Color = clBtnText
424 Font.Height = -11
425 Font.Name = 'MS Sans Serif'
426 Font.Style = [fsBold]
427 ParentFont = False
428 TabOrder = 3
429 OnClick = cmdRecentClick
430 end
431 object cmdOld: TButton
432 Left = 4
433 Top = 23
434 Width = 45
435 Height = 25
436 Caption = '<<'
437 Font.Charset = DEFAULT_CHARSET
438 Font.Color = clBtnText
439 Font.Height = -11
440 Font.Name = 'MS Sans Serif'
441 Font.Style = [fsBold]
442 ParentFont = False
443 TabOrder = 0
444 OnClick = cmdOldClick
445 end
446 end
447 end
448 object pnlFooter: TORAutoPanel
449 Left = 0
450 Top = 328
451 Width = 539
452 Height = 20
453 Align = alBottom
454 TabOrder = 7
455 object lblSpecimen: TLabel
456 Left = 4
457 Top = 28
458 Width = 57
459 Height = 13
460 Caption = 'lblSpecimen'
461 Visible = False
462 end
463 object lblSingleTest: TLabel
464 Left = 88
465 Top = 28
466 Width = 60
467 Height = 13
468 Caption = 'lblSingleTest'
469 Visible = False
470 end
471 object lblFooter: TOROffsetLabel
472 Left = 1
473 Top = 1
474 Width = 537
475 Height = 25
476 Align = alTop
477 Caption =
478 ' KEY: "L" = Abnormal Low, "H" = Abnormal High, "*" = Critical V' +
479 'alue'
480 HorzOffset = 2
481 Transparent = False
482 VertOffset = 2
483 WordWrap = False
484 end
485 object lstTests: TORListBox
486 Left = 24
487 Top = 27
488 Width = 89
489 Height = 17
490 ItemHeight = 13
491 ParentShowHint = False
492 ShowHint = True
493 TabOrder = 0
494 Visible = False
495 ItemTipColor = clWindow
496 LongList = False
497 end
498 end
499 object grdLab: TCaptionStringGrid
500 Left = 0
501 Top = 95
502 Width = 539
503 Height = 122
504 Align = alTop
505 Color = clCream
506 DefaultRowHeight = 15
507 RowCount = 2
508 Font.Charset = DEFAULT_CHARSET
509 Font.Color = clWindowText
510 Font.Height = -11
511 Font.Name = 'MS Sans Serif'
512 Font.Style = []
513 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
514 ParentFont = False
515 TabOrder = 2
516 Visible = False
517 Caption = 'Laboratory Results'
518 ColWidths = (
519 64
520 64
521 64
522 64
523 64)
524 RowHeights = (
525 15
526 15)
527 end
528 object pnlChart: TPanel
529 Left = 0
530 Top = 217
531 Width = 539
532 Height = 85
533 Align = alTop
534 BevelOuter = bvNone
535 Caption = 'no results to graph'
536 TabOrder = 3
537 Visible = False
538 object lblGraph: TLabel
539 Left = 0
540 Top = 72
541 Width = 370
542 Height = 13
543 Alignment = taCenter
544 Caption =
545 'Results may be available, but cannot be graphed. Please try an a' +
546 'lternate view.'
547 end
548 object lstTestGraph: TORListBox
549 Left = 0
550 Top = 0
551 Width = 97
552 Height = 85
553 Align = alLeft
554 ItemHeight = 13
555 ParentShowHint = False
556 ShowHint = True
557 TabOrder = 0
558 OnClick = lstTestGraphClick
559 Caption = 'Tests Graphed'
560 ItemTipColor = clWindow
561 LongList = False
562 Pieces = '2'
563 end
564 object chtChart: TChart
565 Left = 97
566 Top = 0
567 Width = 442
568 Height = 85
569 AllowPanning = pmNone
570 AllowZoom = False
571 BackWall.Brush.Color = clWhite
572 BackWall.Brush.Style = bsClear
573 Title.Text.Strings = (
574 'test name')
575 Title.Visible = False
576 OnClickLegend = chtChartClickLegend
577 OnClickSeries = chtChartClickSeries
578 OnUndoZoom = chtChartUndoZoom
579 LeftAxis.Title.Caption = 'units'
580 Legend.Alignment = laTop
581 Legend.Inverted = True
582 Legend.ShadowSize = 2
583 View3D = False
584 Align = alClient
585 BevelOuter = bvNone
586 Color = clSilver
587 PopupMenu = popChart
588 TabOrder = 1
589 OnMouseDown = chtChartMouseDown
590 object serHigh: TLineSeries
591 Marks.ArrowLength = 8
592 Marks.Visible = False
593 SeriesColor = clRed
594 Title = 'Ref High'
595 LinePen.Style = psDash
596 Pointer.InflateMargins = True
597 Pointer.Style = psRectangle
598 Pointer.Visible = False
599 XValues.DateTime = True
600 XValues.Name = 'X'
601 XValues.Multiplier = 1.000000000000000000
602 XValues.Order = loAscending
603 YValues.DateTime = False
604 YValues.Name = 'Y'
605 YValues.Multiplier = 1.000000000000000000
606 YValues.Order = loNone
607 end
608 object serLow: TLineSeries
609 Marks.ArrowLength = 8
610 Marks.Visible = False
611 SeriesColor = clRed
612 Title = 'Ref Low'
613 LinePen.Style = psDash
614 Pointer.InflateMargins = True
615 Pointer.Style = psRectangle
616 Pointer.Visible = False
617 XValues.DateTime = False
618 XValues.Name = 'X'
619 XValues.Multiplier = 1.000000000000000000
620 XValues.Order = loAscending
621 YValues.DateTime = False
622 YValues.Name = 'Y'
623 YValues.Multiplier = 1.000000000000000000
624 YValues.Order = loNone
625 end
626 object serTest: TLineSeries
627 Marks.ArrowLength = 8
628 Marks.Visible = False
629 SeriesColor = clBlue
630 Title = 'Lab Test'
631 Pointer.InflateMargins = True
632 Pointer.Style = psCircle
633 Pointer.Visible = True
634 XValues.DateTime = True
635 XValues.Name = 'X'
636 XValues.Multiplier = 1.000000000000000000
637 XValues.Order = loAscending
638 YValues.DateTime = False
639 YValues.Name = 'Y'
640 YValues.Multiplier = 1.000000000000000000
641 YValues.Order = loNone
642 end
643 end
644 end
645 object memLab: TRichEdit
646 Left = 0
647 Top = 321
648 Width = 539
649 Height = 7
650 Align = alClient
651 Color = clCream
652 Font.Charset = DEFAULT_CHARSET
653 Font.Color = clWindowText
654 Font.Height = -11
655 Font.Name = 'Courier New'
656 Font.Style = []
657 ParentFont = False
658 PopupMenu = PopupMenu1
659 ReadOnly = True
660 ScrollBars = ssBoth
661 TabOrder = 5
662 Visible = False
663 WantReturns = False
664 WordWrap = False
665 end
666 object Memo1: TMemo
667 Left = 0
668 Top = 302
669 Width = 539
670 Height = 19
671 Align = alTop
672 Font.Charset = DEFAULT_CHARSET
673 Font.Color = clWindowText
674 Font.Height = -11
675 Font.Name = 'Courier New'
676 Font.Style = []
677 Lines.Strings = (
678 '')
679 ParentFont = False
680 ScrollBars = ssVertical
681 TabOrder = 4
682 Visible = False
683 WantTabs = True
684 WordWrap = False
685 OnKeyUp = Memo1KeyUp
686 end
687 object TabControl1: TTabControl
688 Left = 0
689 Top = 79
690 Width = 539
691 Height = 16
692 Align = alTop
693 HotTrack = True
694 Style = tsButtons
695 TabHeight = 16
696 TabOrder = 1
697 Visible = False
698 OnChange = TabControl1Change
699 end
700 object WebBrowser1: TWebBrowser
701 Left = 0
702 Top = 321
703 Width = 539
704 Height = 7
705 TabStop = False
706 Align = alClient
707 TabOrder = 6
708 OnDocumentComplete = WebBrowser1DocumentComplete
709 ControlData = {
710 4C000000B5370000B90000000000000000000000000000000000000000000000
711 000000004C000000000000000000000001000000E0D057007335CF11AE690800
712 2B2E126208000000000000004C0000000114020000000000C000000000000046
713 8000000000000000000000000000000000000000000000000000000000000000
714 00000000000000000100000000000000000000000000000000000000}
715 end
716 end
717 inherited DKLanguageController1: TDKLanguageController
718 LangData = {
719 070066726D4C616273010200000001000000070043617074696F6E0200000008
720 0048656C7046696C65014D0000000D0073687050616765426F74746F6D000007
721 00737074486F727A00000700706E6C4C65667400000800706E6C526967687400
722 000A006C626C5265706F727473010100000003000000070043617074696F6E00
723 08006C626C4461746573010100000004000000070043617074696F6E000A006C
724 626C48656164657273010100000005000000070043617074696F6E000A006C73
725 745265706F727473010100000006000000070043617074696F6E000A006C7374
726 48656164657273010100000007000000070043617074696F6E0008006C737444
727 61746573010200000009000000070043617074696F6E0800000005004974656D
728 73000D00706E6C4F74686572546573747300000D0062766C4F74686572546573
729 747300000D00636D644F74686572546573747301010000000A00000007004361
730 7074696F6E000A006C626C48656164696E6701010000000B0000000700436170
731 74696F6E000900706E6C4865616465720000090062766C48656164657200000C
732 006C626C44617465466C6F617401010000000C000000070043617074696F6E00
733 0C00706E6C576F726B73686565740000090063686B56616C7565730101000000
734 0D000000070043617074696F6E00050063686B334401010000000E0000000700
735 43617074696F6E000700726167486F725601020000000F000000070043617074
736 696F6E1000000005004974656D73000C0063686B41626E6F726D616C73010100
737 000011000000070043617074696F6E000700726167436F724701020000001200
738 0000070043617074696F6E1300000005004974656D7300070063686B5A6F6F6D
739 010100000014000000070043617074696F6E000800706E6C477261706800000C
740 006C626C4772617068496E666F010100000015000000070043617074696F6E00
741 0A0063686B47726170683344010100000016000000070043617074696F6E000E
742 0063686B477261706856616C756573010100000017000000070043617074696F
743 6E000C0063686B47726170685A6F6F6D01010000001800000007004361707469
744 6F6E000A00706E6C427574746F6E73000006006C626C4F6C6401010000001900
745 0000070043617074696F6E0007006C626C5072657601010000001A0000000700
746 43617074696F6E0007006C626C4E65787401010000001B000000070043617074
747 696F6E0009006C626C526563656E7401010000001C000000070043617074696F
748 6E000D006C626C4D6F7374526563656E7401010000001D000000070043617074
749 696F6E0007006C626C4461746500000D006C626C436F6C6C656374696F6E0101
750 0000001E000000070043617074696F6E000700636D644E65787400000700636D
751 645072657600000900636D64526563656E7400000600636D644F6C6400000900
752 706E6C466F6F74657200000B006C626C53706563696D656E01010000001F0000
753 00070043617074696F6E000D006C626C53696E676C6554657374010100000020
754 000000070043617074696F6E0009006C626C466F6F7465720101000000210000
755 00070043617074696F6E0008006C73745465737473000006006772644C616201
756 0100000022000000070043617074696F6E000800706E6C436861727401010000
757 0023000000070043617074696F6E0008006C626C477261706801010000002400
758 0000070043617074696F6E000C006C7374546573744772617068010100000025
759 000000070043617074696F6E0008006368744368617274010200000027000000
760 16004C656674417869732E5469746C652E43617074696F6E260000000A005469
761 746C652E54657874000700736572486967680103000000280000000500546974
762 6C65290000000C005856616C7565732E4E616D652A0000000C005956616C7565
763 732E4E616D650006007365724C6F7701030000002B00000005005469746C652C
764 0000000C005856616C7565732E4E616D652D0000000C005956616C7565732E4E
765 616D650007007365725465737401030000002E00000005005469746C652F0000
766 000C005856616C7565732E4E616D65300000000C005956616C7565732E4E616D
767 650006006D656D4C6162000005004D656D6F3100000B00546162436F6E74726F
768 6C3100000B0057656242726F777365723100000A00506F7075704D656E753100
769 000800476F746F546F7031010100000031000000070043617074696F6E000B00
770 476F746F426F74746F6D31010100000032000000070043617074696F6E000B00
771 467265657A655465787431010100000033000000070043617074696F6E000D00
772 556E667265657A655465787431010100000034000000070043617074696F6E00
773 0800706F70436861727400000900706F7056616C756573010100000035000000
774 070043617074696F6E000500706F703344010100000036000000070043617074
775 696F6E000700706F705A6F6F6D010100000037000000070043617074696F6E00
776 0B00706F705A6F6F6D4261636B010100000038000000070043617074696F6E00
777 02004E3100000700706F70436F7079010100000039000000070043617074696F
778 6E0002004E3200000A00706F7044657461696C7301010000003A000000070043
779 617074696F6E0002004E3300000800706F705072696E7401010000003B000000
780 070043617074696F6E000B0063616C4C616252616E676501040000003F000000
781 0600466F726D61743C0000000B00496E737472756374696F6E3D0000000A004C
782 6162656C53746172743E00000009004C6162656C53746F70000B00646C675769
783 6E5072696E740000060054696D6572310000}
784 end
785 object PopupMenu1: TPopupMenu
786 OnPopup = PopupMenu1Popup
787 Left = 5
788 Top = 320
789 object GotoTop1: TMenuItem
790 Caption = 'Go to Top'
791 Enabled = False
792 OnClick = GotoTop1Click
793 end
794 object GotoBottom1: TMenuItem
795 Caption = 'Go to Bottom'
796 Enabled = False
797 OnClick = GotoBottom1Click
798 end
799 object FreezeText1: TMenuItem
800 Caption = 'Freeze Text'
801 Enabled = False
802 OnClick = FreezeText1Click
803 end
804 object UnfreezeText1: TMenuItem
805 Caption = 'Un-freeze Text'
806 Enabled = False
807 OnClick = UnfreezeText1Click
808 end
809 end
810 object popChart: TPopupMenu
811 OnPopup = popChartPopup
812 Left = 37
813 Top = 317
814 object popValues: TMenuItem
815 Caption = 'Values'
816 OnClick = popValuesClick
817 end
818 object pop3D: TMenuItem
819 Caption = '3D'
820 OnClick = pop3DClick
821 end
822 object popZoom: TMenuItem
823 Caption = 'Zoom Enabled'
824 OnClick = popZoomClick
825 end
826 object popZoomBack: TMenuItem
827 Caption = 'Zoom Back'
828 OnClick = popZoomBackClick
829 end
830 object N1: TMenuItem
831 Caption = '-'
832 end
833 object popCopy: TMenuItem
834 Caption = 'Copy'
835 OnClick = popCopyClick
836 end
837 object N2: TMenuItem
838 Caption = '-'
839 end
840 object popDetails: TMenuItem
841 Caption = 'Details'
842 OnClick = popDetailsClick
843 end
844 object N3: TMenuItem
845 Caption = '-'
846 end
847 object popPrint: TMenuItem
848 Caption = 'Print'
849 OnClick = popPrintClick
850 end
851 end
852 object calLabRange: TORDateRangeDlg
853 DateOnly = True
854 Instruction = 'Enter a date range -'
855 LabelStart = 'Begin Date'
856 LabelStop = 'End Date'
857 RequireTime = False
858 Format = 'mmm d,yy'
859 Left = 66
860 Top = 320
861 end
862 object dlgWinPrint: TPrintDialog
863 Left = 610
864 Top = 23
865 end
866 object Timer1: TTimer
867 Interval = 100
868 OnTimer = Timer1Timer
869 Left = 253
870 Top = 45
871 end
872end
Note: See TracBrowser for help on using the repository browser.