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

Last change on this file since 1803 was 1679, checked in by healthsevak, 10 years ago

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