source: cprs/trunk/CPRS-Chart/fGraphs.dfm@ 830

Last change on this file since 830 was 830, checked in by Kevin Toppenberg, 14 years ago

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