source: cprs/branches/foia-cprs/CPRS-Chart/fGraphs.dfm@ 611

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

Uploading from OR_30_258
File size: 34.0 KB
RevLine 
[460]1object frmGraphs: TfrmGraphs
2 Left = 524
3 Top = 105
4 BorderIcons = []
5 BorderStyle = bsNone
6 Caption = 'CPRS Graphing - CPRSpatient,One'
7 ClientHeight = 412
8 ClientWidth = 592
9 Color = clBtnFace
10 Font.Charset = DEFAULT_CHARSET
11 Font.Color = clWindowText
12 Font.Height = -11
13 Font.Name = 'MS Sans Serif'
14 Font.Style = []
15 OldCreateOrder = False
16 PopupMenu = mnuPopGraphStuff
17 OnClose = FormClose
18 OnCreate = FormCreate
19 OnDestroy = FormDestroy
20 OnShow = FormShow
21 PixelsPerInch = 96
22 TextHeight = 13
23 object pnlHeader: TPanel
24 Left = 0
25 Top = 0
26 Width = 592
27 Height = 21
28 Align = alTop
29 BevelOuter = bvNone
30 TabOrder = 0
31 object pnlTemp: TPanel
32 Left = 416
33 Top = 0
34 Width = 73
35 Height = 17
36 TabOrder = 1
37 Visible = False
38 end
39 object pnlInfo: TORAutoPanel
40 Left = 0
41 Top = 0
42 Width = 592
43 Height = 21
44 Align = alClient
45 BevelOuter = bvNone
46 Caption = 'Select multiple items using Ctrl-click or Shift-click.'
47 Color = clCream
48 Font.Charset = DEFAULT_CHARSET
49 Font.Color = clWindowText
50 Font.Height = -11
51 Font.Name = 'MS Sans Serif'
52 Font.Style = []
53 ParentFont = False
54 TabOrder = 2
55 end
56 object chartBase: TChart
57 Left = 145
58 Top = 0
59 Width = 105
60 Height = 17
61 AllowPanning = pmNone
62 AllowZoom = False
63 BackWall.Brush.Color = clWhite
64 BackWall.Brush.Style = bsClear
65 Gradient.EndColor = clPurple
66 Gradient.Visible = True
67 Title.Text.Strings = (
68 'fsdfs dfs fsd')
69 Title.Visible = False
70 OnClickLegend = chartBaseClickLegend
71 OnClickSeries = chartBaseClickSeries
72 OnUndoZoom = ChartOnUndoZoom
73 OnZoom = ChartOnZoom
74 BottomAxis.Automatic = False
75 BottomAxis.AutomaticMaximum = False
76 BottomAxis.AutomaticMinimum = False
77 BottomAxis.Increment = 0.000694444444444444
78 BottomAxis.Maximum = 25
79 BottomAxis.Visible = False
80 Legend.Alignment = laTop
81 Legend.LegendStyle = lsSeries
82 Legend.ResizeChart = False
83 TopAxis.LabelsOnAxis = False
84 View3D = False
85 Color = clRed
86 TabOrder = 0
87 Visible = False
88 OnDblClick = mnuPopGraphDetailsClick
89 OnMouseDown = chartBaseMouseDown
90 end
91 end
92 object pnlFooter: TPanel
93 Left = 0
94 Top = 383
95 Width = 592
96 Height = 29
97 Align = alBottom
98 BevelOuter = bvNone
99 TabOrder = 2
100 object lblDateRange: TLabel
101 Left = 3
102 Top = 8
103 Width = 61
104 Height = 13
105 Caption = 'Date Range:'
106 end
107 object btnClose: TButton
108 Left = 510
109 Top = 4
110 Width = 70
111 Height = 21
112 Caption = 'Close'
113 TabOrder = 4
114 OnClick = btnCloseClick
115 end
116 object btnChangeSettings: TButton
117 Left = 380
118 Top = 4
119 Width = 85
120 Height = 21
121 Caption = 'Settings...'
122 TabOrder = 3
123 OnClick = btnChangeSettingsClick
124 end
125 object cboDateRange: TORComboBox
126 Left = 68
127 Top = 4
128 Width = 121
129 Height = 21
130 Style = orcsDropDown
131 AutoSelect = True
132 Color = clWindow
133 DropDownCount = 9
134 Items.Strings = (
135 'S^Date Range...'
136 '1^Today'
137 '2^One Week'
138 '3^Two Weeks'
139 '4^One Month'
140 '5^Six Months'
141 '6^One Year'
142 '7^Two Years'
143 '8^All Results')
144 ItemHeight = 13
145 ItemTipColor = clWindow
146 ItemTipEnable = True
147 ListItemsOnly = False
148 LongList = False
149 LookupPiece = 0
150 MaxLength = 0
151 Pieces = '2'
152 Sorted = False
153 SynonymChars = '<>'
154 TabOrder = 0
155 TabStop = True
156 OnChange = cboDateRangeChange
157 OnDropDown = cboDateRangeDropDown
158 CharsNeedMatch = 1
159 end
160 object chkDualViews: TCheckBox
161 Left = 197
162 Top = 7
163 Width = 85
164 Height = 17
165 Caption = 'Split Views'
166 TabOrder = 1
167 OnClick = chkDualViewsClick
168 end
169 object btnGraphSelections: TButton
170 Left = 284
171 Top = 4
172 Width = 85
173 Height = 21
174 Caption = 'Select/Define...'
175 TabOrder = 2
176 OnClick = btnGraphSelectionsClick
177 end
178 end
179 object pnlMain: TPanel
180 Left = 0
181 Top = 21
182 Width = 592
183 Height = 362
184 Align = alClient
185 BevelOuter = bvNone
186 TabOrder = 1
187 object splGraphs: TSplitter
188 Left = 0
189 Top = 261
190 Width = 592
191 Height = 3
192 Cursor = crVSplit
193 Align = alBottom
194 Beveled = True
195 Color = clBtnShadow
196 ParentColor = False
197 OnMoved = splGraphsMoved
198 end
199 object pnlTop: TPanel
200 Tag = 1
201 Left = 0
202 Top = 0
203 Width = 592
204 Height = 261
205 Align = alClient
206 BevelOuter = bvNone
207 TabOrder = 0
208 object splItemsTop: TSplitter
209 Left = 148
210 Top = 0
211 Width = 2
212 Height = 261
213 Cursor = crHSplit
214 AutoSnap = False
215 Beveled = True
216 MinSize = 15
217 OnMoved = splItemsTopMoved
218 end
219 object pnlItemsTop: TPanel
220 Left = 0
221 Top = 0
222 Width = 148
223 Height = 261
224 Align = alLeft
225 BevelOuter = bvNone
226 TabOrder = 0
227 object pnlItemsTopInfo: TPanel
228 Left = 0
229 Top = 0
230 Width = 148
231 Height = 25
232 Align = alTop
233 BevelOuter = bvNone
234 TabOrder = 0
235 DesignSize = (
236 148
237 25)
238 object bvlBottomLeft: TBevel
239 Left = 0
240 Top = 0
241 Width = 2
242 Height = 25
243 Align = alLeft
244 end
245 object bvlBottomRight: TBevel
246 Left = 146
247 Top = 0
248 Width = 2
249 Height = 25
250 Align = alRight
251 Visible = False
252 end
253 object lblViewsTop: TOROffsetLabel
254 Left = 2
255 Top = 0
256 Width = 28
257 Height = 25
258 Align = alLeft
259 Caption = 'View:'
260 HorzOffset = 2
261 Transparent = False
262 VertOffset = 8
263 WordWrap = False
264 end
265 object chkItemsTop: TCheckBox
266 Left = 40
267 Top = 5
268 Width = 105
269 Height = 20
270 Alignment = taLeftJustify
271 Anchors = [akTop, akRight]
272 Caption = 'Individual Graphs'
273 TabOrder = 0
274 OnClick = chkItemsTopClick
275 end
276 end
277 object lvwItemsTop: TListView
278 Left = 0
279 Top = 46
280 Width = 148
281 Height = 215
282 Align = alClient
283 BevelInner = bvNone
284 BevelOuter = bvNone
285 Columns = <
286 item
287 Caption = 'Item'
288 Width = 100
289 end
290 item
291 Caption = 'Type'
292 Width = 60
293 end
294 item
295 Caption = 'View'
296 Width = 40
297 end
298 item
299 Caption = 'Classification'
300 end>
301 HideSelection = False
302 MultiSelect = True
303 ReadOnly = True
304 RowSelect = True
305 ParentShowHint = False
306 ShowHint = False
307 TabOrder = 2
308 ViewStyle = vsReport
309 OnChange = lvwItemsTopChange
310 OnClick = lvwItemsTopClick
311 OnColumnClick = lvwItemsTopColumnClick
312 OnCompare = lvwItemsTopCompare
313 OnEnter = lvwItemsTopEnter
314 OnKeyDown = lvwItemsTopKeyDown
315 end
316 object pnlViewsTopSpacer: TPanel
317 Left = 0
318 Top = 25
319 Width = 148
320 Height = 21
321 Align = alTop
322 BevelOuter = bvNone
323 TabOrder = 1
324 object cboViewsTop: TORComboBox
325 Left = 0
326 Top = 0
327 Width = 140
328 Height = 21
329 Style = orcsDropDown
330 Align = alClient
331 AutoSelect = True
332 Color = clWindow
333 DropDownCount = 12
334 ItemHeight = 13
335 ItemTipColor = clWindow
336 ItemTipEnable = True
337 ListItemsOnly = False
338 LongList = False
339 LookupPiece = 0
340 MaxLength = 0
341 Pieces = '2'
342 Sorted = False
343 SynonymChars = '<>'
344 TabOrder = 0
345 TabStop = True
346 OnChange = cboViewsTopChange
347 OnDropDown = cboViewsTopDropDown
348 OnDropDownClose = cboViewsTopDropDownClose
349 CharsNeedMatch = 1
350 end
351 object pnlViewsTopSpacerRight: TPanel
352 Left = 140
353 Top = 0
354 Width = 8
355 Height = 21
356 Align = alRight
357 BevelOuter = bvNone
358 TabOrder = 1
359 end
360 end
361 end
362 object pnlTopRightPad: TPanel
363 Tag = 50
364 Left = 577
365 Top = 0
366 Width = 15
367 Height = 261
368 Align = alRight
369 BevelOuter = bvNone
370 TabOrder = 1
371 end
372 object pnlScrollTopBase: TPanel
373 Left = 150
374 Top = 0
375 Width = 427
376 Height = 261
377 Align = alClient
378 BevelOuter = bvNone
379 TabOrder = 2
380 OnResize = pnlScrollTopBaseResize
381 object pnlBlankTop: TPanel
382 Left = 0
383 Top = 233
384 Width = 427
385 Height = 20
386 Align = alClient
387 BevelOuter = bvNone
388 TabOrder = 3
389 Visible = False
390 end
391 object scrlTop: TScrollBox
392 Tag = 5
393 Left = 0
394 Top = 233
395 Width = 427
396 Height = 20
397 Align = alClient
398 BevelInner = bvNone
399 BevelOuter = bvNone
400 BorderStyle = bsNone
401 Color = clBtnFace
402 ParentColor = False
403 TabOrder = 0
404 end
405 object pnlDatelineTop: TPanel
406 Left = 0
407 Top = 231
408 Width = 427
409 Height = 30
410 Align = alBottom
411 BevelOuter = bvNone
412 TabOrder = 1
413 object chartDatelineTop: TChart
414 Left = 20
415 Top = 0
416 Width = 407
417 Height = 30
418 AllowPanning = pmNone
419 BackWall.Brush.Color = clWhite
420 BackWall.Brush.Style = bsClear
421 BackWall.Pen.Visible = False
422 Gradient.EndColor = clWhite
423 Gradient.StartColor = 8421631
424 Title.Text.Strings = (
425 '')
426 Title.Visible = False
427 OnClickLegend = chartBaseClickLegend
428 OnClickSeries = chartBaseClickSeries
429 OnUndoZoom = ChartOnUndoZoom
430 OnZoom = ChartOnZoom
431 BottomAxis.Automatic = False
432 BottomAxis.AutomaticMaximum = False
433 BottomAxis.AutomaticMinimum = False
434 BottomAxis.DateTimeFormat = 'M/d/yyyy'
435 BottomAxis.Increment = 0.000694444444444444
436 BottomAxis.Maximum = 25
437 Frame.Visible = False
438 LeftAxis.Automatic = False
439 LeftAxis.AutomaticMaximum = False
440 LeftAxis.AutomaticMinimum = False
441 LeftAxis.Axis.Visible = False
442 LeftAxis.Grid.Visible = False
443 LeftAxis.Labels = False
444 LeftAxis.LabelsOnAxis = False
445 LeftAxis.Maximum = 9
446 LeftAxis.MinorGrid.Visible = True
447 LeftAxis.RoundFirstLabel = False
448 LeftAxis.Title.Caption = ' '
449 LeftAxis.Visible = False
450 Legend.Alignment = laBottom
451 Legend.Color = clCream
452 Legend.LegendStyle = lsSeries
453 Legend.ShadowSize = 1
454 Legend.Visible = False
455 RightAxis.Automatic = False
456 RightAxis.AutomaticMaximum = False
457 RightAxis.AutomaticMinimum = False
458 RightAxis.Axis.Visible = False
459 RightAxis.Labels = False
460 RightAxis.LabelsOnAxis = False
461 RightAxis.RoundFirstLabel = False
462 RightAxis.Visible = False
463 TopAxis.LabelsOnAxis = False
464 View3D = False
465 View3DWalls = False
466 Align = alClient
467 BevelOuter = bvNone
468 TabOrder = 0
469 OnDblClick = mnuPopGraphDetailsClick
470 OnMouseDown = chartBaseMouseDown
471 object serDatelineTop: TGanttSeries
472 ColorEachPoint = True
473 Marks.ArrowLength = 0
474 Marks.Visible = False
475 SeriesColor = clRed
476 ShowInLegend = False
477 OnGetMarkText = serDatelineTopGetMarkText
478 Pointer.InflateMargins = False
479 Pointer.Style = psRectangle
480 Pointer.Visible = True
481 XValues.DateTime = True
482 XValues.Name = 'Start'
483 XValues.Multiplier = 1
484 XValues.Order = loAscending
485 YValues.DateTime = False
486 YValues.Name = 'Y'
487 YValues.Multiplier = 1
488 YValues.Order = loNone
489 StartValues.DateTime = True
490 StartValues.Name = 'Start'
491 StartValues.Multiplier = 1
492 StartValues.Order = loAscending
493 EndValues.DateTime = True
494 EndValues.Name = 'End'
495 EndValues.Multiplier = 1
496 EndValues.Order = loNone
497 NextTask.DateTime = False
498 NextTask.Name = 'NextTask'
499 NextTask.Multiplier = 1
500 NextTask.Order = loNone
501 end
502 end
503 object pnlDatelineTopSpacer: TORAutoPanel
504 Left = 0
505 Top = 0
506 Width = 20
507 Height = 30
508 Align = alLeft
509 BevelOuter = bvNone
510 TabOrder = 1
511 end
512 end
513 object pnlData: TPanel
514 Left = 0
515 Top = 0
516 Width = 427
517 Height = 233
518 Align = alTop
519 Caption = 'pnlData'
520 TabOrder = 2
521 Visible = False
522 DesignSize = (
523 427
524 233)
525 object lstZoomHistory: TListBox
526 Left = 336
527 Top = 4
528 Width = 82
529 Height = 33
530 Anchors = [akLeft, akTop, akRight]
531 ItemHeight = 13
532 TabOrder = 22
533 end
534 object lstTypes: TListBox
535 Left = 8
536 Top = 119
537 Width = 413
538 Height = 33
539 Anchors = [akLeft, akTop, akRight]
540 ItemHeight = 13
541 TabOrder = 0
542 end
543 object lstItemsTemp: TListBox
544 Left = 8
545 Top = 4
546 Width = 73
547 Height = 33
548 ItemHeight = 13
549 TabOrder = 1
550 end
551 object lstAllTypes: TListBox
552 Left = 254
553 Top = 4
554 Width = 82
555 Height = 33
556 Anchors = [akLeft, akTop, akRight]
557 ItemHeight = 13
558 TabOrder = 2
559 end
560 object lstItems: TListBox
561 Left = 8
562 Top = 158
563 Width = 413
564 Height = 33
565 Anchors = [akLeft, akTop, akRight]
566 ItemHeight = 13
567 TabOrder = 3
568 end
569 object lstData: TListBox
570 Left = 8
571 Top = 81
572 Width = 413
573 Height = 33
574 Anchors = [akLeft, akTop, akRight]
575 ItemHeight = 13
576 TabOrder = 4
577 end
578 object lstSpec2: TListBox
579 Left = 188
580 Top = 43
581 Width = 42
582 Height = 33
583 ItemHeight = 13
584 TabOrder = 5
585 end
586 object lstSpec1: TListBox
587 Left = 143
588 Top = 43
589 Width = 42
590 Height = 33
591 ItemHeight = 13
592 TabOrder = 6
593 end
594 object lstSpec3: TListBox
595 Left = 233
596 Top = 43
597 Width = 42
598 Height = 33
599 ItemHeight = 13
600 TabOrder = 7
601 end
602 object lstSpec4: TListBox
603 Left = 278
604 Top = 43
605 Width = 42
606 Height = 33
607 ItemHeight = 13
608 TabOrder = 8
609 end
610 object lstMultiSpec: TListBox
611 Left = 320
612 Top = 43
613 Width = 45
614 Height = 33
615 ItemHeight = 13
616 TabOrder = 10
617 end
618 object lstTestSpec: TListBox
619 Left = 368
620 Top = 43
621 Width = 42
622 Height = 33
623 ItemHeight = 13
624 TabOrder = 11
625 end
626 object lstSelCopyBottom: TListBox
627 Left = 283
628 Top = 195
629 Width = 41
630 Height = 33
631 ItemHeight = 13
632 TabOrder = 15
633 end
634 object lstTempCheck: TListBox
635 Left = 53
636 Top = 195
637 Width = 41
638 Height = 33
639 ItemHeight = 13
640 MultiSelect = True
641 TabOrder = 18
642 end
643 object lstViews: TListBox
644 Left = 191
645 Top = 195
646 Width = 41
647 Height = 33
648 ItemHeight = 13
649 MultiSelect = True
650 TabOrder = 19
651 end
652 object lstScratchTemp: TListBox
653 Left = 53
654 Top = 43
655 Width = 42
656 Height = 33
657 ItemHeight = 13
658 TabOrder = 20
659 end
660 object lstScratchLab: TListBox
661 Left = 98
662 Top = 43
663 Width = 42
664 Height = 33
665 ItemHeight = 13
666 TabOrder = 21
667 end
668 object lstCheck: TListBox
669 Left = 172
670 Top = 5
671 Width = 73
672 Height = 33
673 ItemHeight = 13
674 MultiSelect = True
675 TabOrder = 13
676 end
677 object lstSelCopyTop: TListBox
678 Left = 237
679 Top = 195
680 Width = 41
681 Height = 33
682 ItemHeight = 13
683 TabOrder = 16
684 end
685 object lstScratchSwap: TListBox
686 Left = 8
687 Top = 43
688 Width = 41
689 Height = 33
690 ItemHeight = 13
691 TabOrder = 9
692 end
693 object lstNonNumeric: TListBox
694 Left = 90
695 Top = 4
696 Width = 79
697 Height = 33
698 ItemHeight = 13
699 TabOrder = 12
700 end
701 object lstDrugClass: TListBox
702 Left = 8
703 Top = 195
704 Width = 41
705 Height = 33
706 ItemHeight = 13
707 TabOrder = 14
708 end
709 object lstSelPrevTop: TListBox
710 Left = 329
711 Top = 195
712 Width = 41
713 Height = 33
714 ItemHeight = 13
715 TabOrder = 23
716 end
717 object lstSelPrevBottom: TListBox
718 Left = 375
719 Top = 195
720 Width = 41
721 Height = 33
722 ItemHeight = 13
723 TabOrder = 24
724 end
725 object lstTemp: TListBox
726 Left = 99
727 Top = 195
728 Width = 41
729 Height = 33
730 ItemHeight = 13
731 MultiSelect = True
732 TabOrder = 17
733 end
734 object lstComp: TListBox
735 Left = 145
736 Top = 195
737 Width = 41
738 Height = 33
739 ItemHeight = 13
740 MultiSelect = True
741 TabOrder = 25
742 end
743 end
744 end
745 end
746 object pnlBottom: TPanel
747 Tag = 1
748 Left = 0
749 Top = 264
750 Width = 592
751 Height = 98
752 Align = alBottom
753 BevelOuter = bvNone
754 TabOrder = 1
755 object splItemsBottom: TSplitter
756 Left = 148
757 Top = 0
758 Width = 2
759 Height = 98
760 Cursor = crHSplit
761 AutoSnap = False
762 Beveled = True
763 MinSize = 15
764 OnMoved = splItemsBottomMoved
765 end
766 object pnlItemsBottom: TPanel
767 Left = 0
768 Top = 0
769 Width = 148
770 Height = 98
771 Align = alLeft
772 BevelOuter = bvNone
773 TabOrder = 0
774 object pnlItemsBottomInfo: TPanel
775 Left = 0
776 Top = 0
777 Width = 148
778 Height = 25
779 Align = alTop
780 BevelOuter = bvNone
781 TabOrder = 0
782 DesignSize = (
783 148
784 25)
785 object bvlTopLeft: TBevel
786 Left = 0
787 Top = 0
788 Width = 2
789 Height = 25
790 Align = alLeft
791 end
792 object bvlTopRight: TBevel
793 Left = 146
794 Top = 0
795 Width = 2
796 Height = 25
797 Align = alRight
798 Visible = False
799 end
800 object lblViewsBottom: TOROffsetLabel
801 Left = 2
802 Top = 0
803 Width = 28
804 Height = 25
805 Align = alLeft
806 Caption = 'View:'
807 HorzOffset = 2
808 Transparent = False
809 VertOffset = 8
810 WordWrap = False
811 end
812 object chkItemsBottom: TCheckBox
813 Left = 40
814 Top = 5
815 Width = 105
816 Height = 20
817 Alignment = taLeftJustify
818 Anchors = [akTop, akRight]
819 Caption = 'Individual Graphs'
820 TabOrder = 0
821 OnClick = chkItemsBottomClick
822 OnEnter = chkItemsBottomEnter
823 end
824 end
825 object lvwItemsBottom: TListView
826 Left = 0
827 Top = 46
828 Width = 148
829 Height = 52
830 Align = alClient
831 BevelInner = bvNone
832 BevelOuter = bvNone
833 Columns = <
834 item
835 Caption = 'Item'
836 Width = 100
837 end
838 item
839 Caption = 'Type'
840 Width = 60
841 end
842 item
843 Caption = 'View'
844 Width = 40
845 end
846 item
847 Caption = 'Classification'
848 end>
849 HideSelection = False
850 MultiSelect = True
851 ReadOnly = True
852 RowSelect = True
853 ParentShowHint = False
854 ShowHint = False
855 TabOrder = 2
856 ViewStyle = vsReport
857 OnChange = lvwItemsBottomChange
858 OnClick = lvwItemsBottomClick
859 OnColumnClick = lvwItemsBottomColumnClick
860 OnCompare = lvwItemsBottomCompare
861 OnEnter = lvwItemsBottomEnter
862 OnKeyDown = lvwItemsTopKeyDown
863 end
864 object pnlViewsBottomSpacer: TPanel
865 Left = 0
866 Top = 25
867 Width = 148
868 Height = 21
869 Align = alTop
870 BevelOuter = bvNone
871 TabOrder = 1
872 object cboViewsBottom: TORComboBox
873 Left = 0
874 Top = 0
875 Width = 140
876 Height = 21
877 Style = orcsDropDown
878 Align = alClient
879 AutoSelect = True
880 Color = clWindow
881 DropDownCount = 12
882 ItemHeight = 13
883 ItemTipColor = clWindow
884 ItemTipEnable = True
885 ListItemsOnly = False
886 LongList = False
887 LookupPiece = 0
888 MaxLength = 0
889 Pieces = '2'
890 Sorted = False
891 SynonymChars = '<>'
892 TabOrder = 0
893 TabStop = True
894 OnChange = cboViewsBottomChange
895 OnDropDown = cboViewsBottomDropDown
896 OnDropDownClose = cboViewsBottomDropDownClose
897 OnEnter = cboViewsBottomEnter
898 CharsNeedMatch = 1
899 end
900 object pnlViewsBottomSpacerRight: TPanel
901 Left = 140
902 Top = 0
903 Width = 8
904 Height = 21
905 Align = alRight
906 BevelOuter = bvNone
907 TabOrder = 1
908 end
909 end
910 end
911 object pnlBottomRightPad: TPanel
912 Tag = 50
913 Left = 577
914 Top = 0
915 Width = 15
916 Height = 98
917 Align = alRight
918 BevelOuter = bvNone
919 TabOrder = 1
920 end
921 object pnlScrollBottomBase: TPanel
922 Left = 150
923 Top = 0
924 Width = 427
925 Height = 98
926 Align = alClient
927 BevelOuter = bvNone
928 TabOrder = 2
929 object pnlBlankBottom: TPanel
930 Left = 0
931 Top = 0
932 Width = 427
933 Height = 68
934 Align = alClient
935 BevelOuter = bvNone
936 TabOrder = 2
937 Visible = False
938 end
939 object pnlDatelineBottom: TPanel
940 Left = 0
941 Top = 68
942 Width = 427
943 Height = 30
944 Align = alBottom
945 BevelOuter = bvNone
946 TabOrder = 1
947 object chartDatelineBottom: TChart
948 Left = 20
949 Top = 0
950 Width = 407
951 Height = 30
952 AllowPanning = pmNone
953 BackWall.Brush.Color = clWhite
954 BackWall.Brush.Style = bsClear
955 BackWall.Pen.Visible = False
956 Gradient.EndColor = clGradientActiveCaption
957 Title.Text.Strings = (
958 '')
959 Title.Visible = False
960 OnClickLegend = chartBaseClickLegend
961 OnClickSeries = chartBaseClickSeries
962 OnUndoZoom = ChartOnUndoZoom
963 OnZoom = ChartOnZoom
964 BottomAxis.Automatic = False
965 BottomAxis.AutomaticMaximum = False
966 BottomAxis.AutomaticMinimum = False
967 BottomAxis.DateTimeFormat = 'M/d/yyyy'
968 BottomAxis.Increment = 0.000694444444444444
969 BottomAxis.Maximum = 25
970 Frame.Visible = False
971 LeftAxis.Automatic = False
972 LeftAxis.AutomaticMaximum = False
973 LeftAxis.AutomaticMinimum = False
974 LeftAxis.Axis.Visible = False
975 LeftAxis.ExactDateTime = False
976 LeftAxis.Labels = False
977 LeftAxis.LabelsOnAxis = False
978 LeftAxis.Maximum = 9
979 LeftAxis.MinorGrid.Visible = True
980 LeftAxis.RoundFirstLabel = False
981 LeftAxis.Title.Caption = ' '
982 Legend.Alignment = laBottom
983 Legend.Color = clCream
984 Legend.LegendStyle = lsSeries
985 Legend.ShadowSize = 1
986 Legend.Visible = False
987 RightAxis.Automatic = False
988 RightAxis.AutomaticMaximum = False
989 RightAxis.AutomaticMinimum = False
990 RightAxis.Axis.Visible = False
991 RightAxis.Labels = False
992 RightAxis.LabelsOnAxis = False
993 RightAxis.RoundFirstLabel = False
994 RightAxis.Visible = False
995 TopAxis.LabelsOnAxis = False
996 View3D = False
997 View3DWalls = False
998 Align = alClient
999 BevelOuter = bvNone
1000 TabOrder = 0
1001 OnDblClick = mnuPopGraphDetailsClick
1002 OnMouseDown = chartBaseMouseDown
1003 object serDatelineBottom: TGanttSeries
1004 ColorEachPoint = True
1005 Marks.ArrowLength = 0
1006 Marks.Visible = False
1007 SeriesColor = clRed
1008 ShowInLegend = False
1009 OnGetMarkText = serDatelineTopGetMarkText
1010 Pointer.InflateMargins = True
1011 Pointer.Style = psRectangle
1012 Pointer.Visible = True
1013 XValues.DateTime = True
1014 XValues.Name = 'Start'
1015 XValues.Multiplier = 1
1016 XValues.Order = loAscending
1017 YValues.DateTime = False
1018 YValues.Name = 'Y'
1019 YValues.Multiplier = 1
1020 YValues.Order = loNone
1021 StartValues.DateTime = True
1022 StartValues.Name = 'Start'
1023 StartValues.Multiplier = 1
1024 StartValues.Order = loAscending
1025 EndValues.DateTime = True
1026 EndValues.Name = 'End'
1027 EndValues.Multiplier = 1
1028 EndValues.Order = loNone
1029 NextTask.DateTime = False
1030 NextTask.Name = 'NextTask'
1031 NextTask.Multiplier = 1
1032 NextTask.Order = loNone
1033 end
1034 end
1035 object pnlDatelineBottomSpacer: TORAutoPanel
1036 Left = 0
1037 Top = 0
1038 Width = 20
1039 Height = 30
1040 Align = alLeft
1041 BevelOuter = bvNone
1042 TabOrder = 1
1043 end
1044 end
1045 object scrlBottom: TScrollBox
1046 Tag = 5
1047 Left = 0
1048 Top = 0
1049 Width = 427
1050 Height = 68
1051 Align = alClient
1052 BevelInner = bvNone
1053 BorderStyle = bsNone
1054 Color = clBtnFace
1055 ParentColor = False
1056 TabOrder = 0
1057 end
1058 end
1059 end
1060 end
1061 object mnuPopGraphStuff: TPopupMenu
1062 OnPopup = mnuPopGraphStuffPopup
1063 Left = 4
1064 object mnuPopGraphDetails: TMenuItem
1065 Caption = 'Details...'
1066 Enabled = False
1067 OnClick = mnuPopGraphDetailsClick
1068 end
1069 object mnuPopGraphDefineViews: TMenuItem
1070 Caption = 'Select/Define...'
1071 OnClick = btnGraphSelectionsClick
1072 end
1073 object mnuPopGraphChangeViews: TMenuItem
1074 Caption = 'Settings...'
1075 OnClick = btnChangeSettingsClick
1076 end
1077 object N4: TMenuItem
1078 Caption = '-'
1079 end
1080 object mnuPopGraphReset: TMenuItem
1081 Caption = 'Reset Display'
1082 ShortCut = 45
1083 OnClick = mnuPopGraphResetClick
1084 end
1085 object mnuPopGraphZoomBack: TMenuItem
1086 Caption = 'Zoom Back'
1087 Enabled = False
1088 ShortCut = 46
1089 OnClick = mnuPopGraphZoomBackClick
1090 end
1091 object mnuPopGraphSplit: TMenuItem
1092 Caption = 'Split Numerics/Events'
1093 OnClick = mnuPopGraphSplitClick
1094 end
1095 object mnuPopGraphSwap: TMenuItem
1096 Caption = 'Swap'
1097 OnClick = mnuPopGraphSwapClick
1098 end
1099 object mnuPopGraphIsolate: TMenuItem
1100 Caption = 'Move'
1101 Enabled = False
1102 OnClick = mnuPopGraphIsolateClick
1103 end
1104 object mnuPopGraphRemove: TMenuItem
1105 Caption = 'Remove'
1106 Enabled = False
1107 OnClick = mnuPopGraphRemoveClick
1108 end
1109 object N1: TMenuItem
1110 Caption = '-'
1111 end
1112 object mnuPopGraphStayOnTop: TMenuItem
1113 Caption = 'Stay on Top'
1114 OnClick = mnuPopGraphStayOnTopClick
1115 end
1116 object mnuPopGraphDualViews: TMenuItem
1117 Caption = 'Dual Views'
1118 Visible = False
1119 OnClick = mnuPopGraphDualViewsClick
1120 end
1121 object mnuPopGraphSeparate1: TMenuItem
1122 Caption = 'Individual Graphs'
1123 Visible = False
1124 OnClick = mnuPopGraphSeparate1Click
1125 end
1126 object mnuPopGraph3D: TMenuItem
1127 Caption = '3D'
1128 OnClick = mnuPopGraph3DClick
1129 end
1130 object mnuPopGraphLegend: TMenuItem
1131 Caption = 'Legend'
1132 Visible = False
1133 OnClick = mnuPopGraphLegendClick
1134 end
1135 object mnuPopGraphValues: TMenuItem
1136 Caption = 'Values'
1137 OnClick = mnuPopGraphValuesClick
1138 end
1139 object mnuPopGraphFixed: TMenuItem
1140 Caption = 'Fixed Date Range'
1141 Visible = False
1142 OnClick = mnuPopGraphFixedClick
1143 end
1144 object mnuPopGraphVertical: TMenuItem
1145 Caption = 'Vertical Zoom'
1146 OnClick = mnuPopGraphVerticalClick
1147 end
1148 object mnuPopGraphHorizontal: TMenuItem
1149 Caption = 'Horizontal Zoom'
1150 Visible = False
1151 OnClick = mnuPopGraphHorizontalClick
1152 end
1153 object mnuPopGraphLines: TMenuItem
1154 Caption = 'Lines'
1155 Visible = False
1156 OnClick = mnuPopGraphLinesClick
1157 end
1158 object mnuPopGraphDates: TMenuItem
1159 Caption = 'Dates'
1160 Visible = False
1161 OnClick = mnuPopGraphDatesClick
1162 end
1163 object mnuPopGraphSort: TMenuItem
1164 Caption = 'Sort by Type'
1165 Visible = False
1166 OnClick = mnuPopGraphSortClick
1167 end
1168 object mnuPopGraphClear: TMenuItem
1169 Caption = 'Clear Background'
1170 Visible = False
1171 OnClick = mnuPopGraphClearClick
1172 end
1173 object mnuPopGraphGradient: TMenuItem
1174 Caption = 'Gradient'
1175 Visible = False
1176 OnClick = mnuPopGraphGradientClick
1177 end
1178 object mnuPopGraphHints: TMenuItem
1179 Caption = 'Hints'
1180 Visible = False
1181 end
1182 object N2: TMenuItem
1183 Caption = '-'
1184 end
1185 object mnuPopGraphCopy: TMenuItem
1186 Caption = 'Copy'
1187 ShortCut = 16451
1188 OnClick = mnuPopGraphCopyClick
1189 end
1190 object mnuPopGraphPrint: TMenuItem
1191 Caption = 'Print...'
1192 OnClick = mnuPopGraphPrintClick
1193 end
1194 object N3: TMenuItem
1195 Caption = '-'
1196 Visible = False
1197 end
1198 object mnumedsasgantt: TMenuItem
1199 Caption = 'meds as gantt'
1200 Checked = True
1201 RadioItem = True
1202 Visible = False
1203 OnClick = mnumedsasganttClick
1204 end
1205 object mnumedsasganttvertheight: TMenuItem
1206 Caption = 'meds as gantt + vert + height change'
1207 RadioItem = True
1208 Visible = False
1209 OnClick = mnumedsasganttClick
1210 end
1211 object mnuPopGraphToday: TMenuItem
1212 Caption = 'Reset Today...'
1213 Visible = False
1214 OnClick = mnuPopGraphTodayClick
1215 end
1216 object testcount1: TMenuItem
1217 Caption = 'test count'
1218 Visible = False
1219 OnClick = testcount1Click
1220 end
1221 end
1222 object calDateRange: TORDateRangeDlg
1223 DateOnly = False
1224 Instruction = 'Enter a date range -'
1225 LabelStart = 'Begin Date'
1226 LabelStop = 'End Date'
1227 RequireTime = False
1228 Format = 'mmm d,yy@hh:nn'
1229 Left = 32
1230 end
1231 object dlgDate: TORDateTimeDlg
1232 FMDateTime = 3040806
1233 DateOnly = True
1234 RequireTime = False
1235 Left = 57
1236 end
1237 object timHintPause: TTimer
1238 Enabled = False
1239 Interval = 100
1240 OnTimer = timHintPauseTimer
1241 Left = 83
1242 end
1243end
Note: See TracBrowser for help on using the repository browser.