Procedure

Layout

Module

fGraphs

Last Modified

7/15/2014 3:26:36 PM

Scope

Local

Local subprogram to

GetSize

Declaration

procedure Layout(name, FR: string; v1, v2, v3, v4: integer);

Calls Hierarchy


Layout
 ├TfrmGraphs.splItemsTopMoved
 ├TfrmGraphs.chkDualViewsClick
 │ ├TfrmGraphs.lvwItemsTopClick
 │ │ ├GraphTurboOn
 │ │ ├TfrmGraphs.Switch
 │ │ │ ├rpcFastItems
 │ │ │ │ └onoff
 │ │ │ ├rpcFastData
 │ │ │ │ └onoff
 │ │ │ ├rpcFastLabs
 │ │ │ │ └onoff
 │ │ │ └TfrmGraphs.FastLab
 │ │ │   └TfrmGraphs.SaveTestData
 │ │ │     ├TfrmGraphs.ItemName
 │ │ │     └TfrmGraphs.LabData
 │ │ │       ├rpcGetItemData
 │ │ │       │ └onoff
 │ │ │       ├TfrmGraphs.SpecRefCheck
 │ │ │       │ └TfrmGraphs.RefUnits
 │ │ │       │   └TfrmGraphs.SelectRef
 │ │ │       │     └CheckRef
 │ │ │       ├TfrmGraphs.SpecRefSet
 │ │ │       │ └MultiRef
 │ │ │       ├TfrmGraphs.FileNameX
 │ │ │       ├TfrmGraphs.LabCheck
 │ │ │       ├TfrmGraphs.DateRangeMultiItems
 │ │ │       └TfrmGraphs.LabAdd
 │ │ └TfrmGraphs.ItemsClick
 │ │   ├TfrmGraphs.CheckExpandedLabs
 │ │   │ └TfrmGraphs.cboDateRangeChange
 │ │   │   ├TfrmGraphs.SelCopy
 │ │   │   ├TfrmGraphs.HideGraphs
 │ │   │   ├TfrmGraphs.DateSteps
 │ │   │   ├TfrmGraphs.FilterListView
 │ │   │   │ ├TfrmGraphs.TypeIsDisplayed
 │ │   │   │ ├TfrmGraphs.DateRangeItems
 │ │   │   │ │ ├rpcDateItem
 │ │   │   │ │ │ └onoff
 │ │   │   │ │ ├TfrmGraphs.FileNameX
 │ │   │   │ │ ├TfrmGraphs.UpdateView
 │ │   │   │ │ └TfrmGraphs.DateRangeMultiItems
 │ │   │   │ ├TfrmGraphs.FileNameX
 │ │   │   │ ├TfrmGraphs.UpdateView
 │ │   │   │ └TfrmGraphs.SortListView
 │ │   │   │   ├TfrmGraphs.lvwItemsTopColumnClick
 │ │   │   │   ├TfrmGraphs.lvwItemsBottomColumnClick
 │ │   │   │   └TfrmGraphs.AssignProfile
 │ │   │   │     └TfrmGraphs.SetProfile
 │ │   │   │       └TfrmGraphs.ProfileName
 │ │   │   │         └TfrmGraphs.DCName
 │ │   │   │           └rpcClass
 │ │   │   │             └onoff
 │ │   │   ├TfrmGraphs.SelReset
 │ │   │   ├TfrmGraphs.DisplayData
 │ │   │   │ ├TfrmGraphs.SetFontSize
 │ │   │   │ ├TfrmGraphs.ItemsClick...
 │ │   │   │ ├TfrmGraphs.MakeSeparate
 │ │   │   │ │ ├TfrmGraphs.chartBaseMouseMove
 │ │   │   │ │ │ └TfrmGraphs.InactivateHint
 │ │   │   │ │ ├TfrmGraphs.MakeSeparateItems
 │ │   │   │ │ │ ├TfrmGraphs.GraphTypeNum
 │ │   │   │ │ │ ├TfrmGraphs.TitleInfo
 │ │   │   │ │ │ │ └TfrmGraphs.RefUnits...
 │ │   │   │ │ │ ├TfrmGraphs.MakeChart
 │ │   │   │ │ │ │ ├TfrmGraphs.HideDates
 │ │   │   │ │ │ │ ├TfrmGraphs.ChartOnZoom
 │ │   │   │ │ │ │ │ ├TfrmGraphs.SizeDates
 │ │   │   │ │ │ │ │ │ ├TfrmGraphs.GraphFooter
 │ │   │   │ │ │ │ │ │ └TfrmGraphs.SeriesForLabels
 │ │   │   │ │ │ │ │ └TfrmGraphs.ZoomUpdateInfo
 │ │   │   │ │ │ │ │   ├TfrmGraphs.InfoMessage
 │ │   │   │ │ │ │ │   └TfrmGraphs.MergedLabsSelected
 │ │   │   │ │ │ │ ├TfrmGraphs.ChartOnUndoZoom
 │ │   │   │ │ │ │ │ ├TfrmGraphs.SizeDates...
 │ │   │   │ │ │ │ │ ├TfrmGraphs.InfoMessage
 │ │   │   │ │ │ │ │ └TfrmGraphs.MergedLabsSelected
 │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseClickSeries
 │ │   │   │ │ │ │ │ ├TfrmGraphs.InactivateHint
 │ │   │   │ │ │ │ │ └TfrmGraphs.SeriesClicks
 │ │   │   │ │ │ │ │   ├TfrmGraphs.ValueText
 │ │   │   │ │ │ │ │   │ ├TfrmGraphs.NonNumText
 │ │   │   │ │ │ │ │   │ │ ├TfrmGraphs.FileNameX
 │ │   │   │ │ │ │ │   │ │ ├TfrmGraphs.ItemName
 │ │   │   │ │ │ │ │   │ │ └TfrmGraphs.SetRefNonNum
 │ │   │   │ │ │ │ │   │ │   └TfrmGraphs.RefUnits...
 │ │   │   │ │ │ │ │   │ ├TfrmGraphs.ItemCheck
 │ │   │   │ │ │ │ │   │ ├TfrmGraphs.CheckMedNum
 │ │   │   │ │ │ │ │   │ ├TfrmGraphs.FileNameX
 │ │   │   │ │ │ │ │   │ ├TfrmGraphs.ValueDates
 │ │   │   │ │ │ │ │   │ ├TfrmGraphs.ResultValue
 │ │   │   │ │ │ │ │   │ │ ├TfrmGraphs.serDatelineTopGetMarkText
 │ │   │   │ │ │ │ │   │ │ └TfrmGraphs.BPValue
 │ │   │   │ │ │ │ │   │ └TfrmGraphs.OtherInfo
 │ │   │   │ │ │ │ │   │   └TfrmGraphs.SetRef
 │ │   │   │ │ │ │ │   │     └TfrmGraphs.RefUnits...
 │ │   │   │ │ │ │ │   ├TfrmGraphs.LabNameResults
 │ │   │   │ │ │ │ │   └TfrmGraphs.AllTypeDate
 │ │   │   │ │ │ │ │     ├TfrmGraphs.CheckToAddData
 │ │   │   │ │ │ │ │     │ ├TfrmGraphs.LabData...
 │ │   │   │ │ │ │ │     │ └rpcGetItemData...
 │ │   │   │ │ │ │ │     ├TfrmGraphs.TempData
 │ │   │   │ │ │ │ │     │ ├TfrmGraphs.ItemName
 │ │   │   │ │ │ │ │     │ └TfrmGraphs.SetRef...
 │ │   │   │ │ │ │ │     └ReportBox
 │ │   │   │ │ │ │ │       └CreateReportBox
 │ │   │   │ │ │ │ │         └TfrmBase508Form.Create
 │ │   │   │ │ │ │ │           ├TfrmBase508Form.UpdateAccessibilityActions
 │ │   │   │ │ │ │ │           ├UnfocusableControlEnter
 │ │   │   │ │ │ │ │           └AdjustControls
 │ │   │   │ │ │ │ │             ├TfrmBase508Form.ModifyUnfocusableControl
 │ │   │   │ │ │ │ │             └..(rec)..
 │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseClickLegend
 │ │   │   │ │ │ │ │ └TfrmGraphs.ItemDateRange
 │ │   │   │ │ │ │ │   ├TfrmGraphs.ValueText...
 │ │   │   │ │ │ │ │   └ReportBox...
 │ │   │   │ │ │ │ ├TfrmGraphs.mnuPopGraphDetailsClick
 │ │   │   │ │ │ │ │ ├TfrmGraphs.ItemCheck
 │ │   │   │ │ │ │ │ ├TfrmGraphs.HSAbbrev
 │ │   │   │ │ │ │ │ ├TfrmGraphs.ValueText...
 │ │   │   │ │ │ │ │ ├TfrmGraphs.LabNameResults
 │ │   │   │ │ │ │ │ ├TfrmGraphs.AllTypeDate...
 │ │   │   │ │ │ │ │ ├TfrmGraphs.OneDayTypeDetails
 │ │   │   │ │ │ │ │ │ ├TfrmGraphs.FileNameX
 │ │   │   │ │ │ │ │ │ ├TfrmGraphs.ItemName
 │ │   │   │ │ │ │ │ │ ├rpcDetailDay
 │ │   │   │ │ │ │ │ │ │ └onoff
 │ │   │   │ │ │ │ │ │ ├TfrmGraphs.NotifyApps
 │ │   │   │ │ │ │ │ │ └ReportBox...
 │ │   │   │ │ │ │ │ └TfrmGraphs.AllDetails
 │ │   │   │ │ │ │ │   ├TfrmGraphs.HSAbbrev
 │ │   │   │ │ │ │ │   ├rpcDetailSelected
 │ │   │   │ │ │ │ │   │ └onoff
 │ │   │   │ │ │ │ │   ├TfrmGraphs.NotifyApps
 │ │   │   │ │ │ │ │   ├ReportBox...
 │ │   │   │ │ │ │ │   └TfrmGraphs.ItemDateRange...
 │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseMouseDown
 │ │   │   │ │ │ │ │ ├TfrmGraphs.InactivateHint
 │ │   │   │ │ │ │ │ └TfrmGraphs.MouseClicks
 │ │   │   │ │ │ │ │   └TfrmGraphs.LabelClicks
 │ │   │   │ │ │ │ │     ├TfrmGraphs.mnuPopGraphDetailsClick...
 │ │   │   │ │ │ │ │     ├TfrmGraphs.ValueText...
 │ │   │   │ │ │ │ │     ├TfrmGraphs.LabNameResults
 │ │   │   │ │ │ │ │     └TfrmGraphs.AllTypeDate...
 │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseMouseUp
 │ │   │   │ │ │ │ └TfrmGraphs.chartBaseMouseMove...
 │ │   │   │ │ │ ├TfrmGraphs.PadLeftEvent
 │ │   │   │ │ │ ├TfrmGraphs.MakeLineSeries
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo
 │ │   │   │ │ │ │ │ ├TfrmGraphs.GetData
 │ │   │   │ │ │ │ │ │ └TfrmGraphs.FMCorrectedDate
 │ │   │   │ │ │ │ │ └TfrmGraphs.NextColor
 │ │   │   │ │ │ │ ├TfrmGraphs.NextPointerStyle
 │ │   │   │ │ │ │ ├TfrmGraphs.BPCheck
 │ │   │   │ │ │ │ │ └TfrmGraphs.MakeSeriesBP
 │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
 │ │   │   │ │ │ │ ├TfrmGraphs.HighLow
 │ │   │   │ │ │ │ │ └TfrmGraphs.FMToDateTime
 │ │   │   │ │ │ │ ├TfrmGraphs.BPAdd
 │ │   │   │ │ │ │ │ └TfrmGraphs.BorderValue
 │ │   │   │ │ │ │ ├TfrmGraphs.NumAdd
 │ │   │   │ │ │ │ │ ├TfrmGraphs.StdDev
 │ │   │   │ │ │ │ │ ├TfrmGraphs.BorderValue
 │ │   │   │ │ │ │ │ └TfrmGraphs.InvVal
 │ │   │   │ │ │ │ ├TfrmGraphs.NonNumSave
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesRef
 │ │   │   │ │ │ │ │ └TfrmGraphs.BorderValue
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │ │ ├TfrmGraphs.PainAdd
 │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
 │ │   │   │ │ │ ├TfrmGraphs.MakeBarSeries
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
 │ │   │   │ │ │ │ ├TfrmGraphs.NextPointerStyle
 │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
 │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
 │ │   │   │ │ │ │ ├TfrmGraphs.InfoMessage
 │ │   │   │ │ │ │ ├TfrmGraphs.MergedLabsSelected
 │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
 │ │   │   │ │ │ ├TfrmGraphs.MakeVisitGanttSeries
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
 │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
 │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
 │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
 │ │   │   │ │ │ ├TfrmGraphs.MakePointSeries
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
 │ │   │   │ │ │ │ ├TfrmGraphs.NextPointerStyle
 │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
 │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
 │ │   │   │ │ │ │ └TfrmGraphs.TempCheck
 │ │   │   │ │ │ ├TfrmGraphs.MakeGanttSeries
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
 │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
 │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
 │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
 │ │   │   │ │ │ └TfrmGraphs.MakeOtherSeries
 │ │   │   │ │ │   ├TfrmGraphs.MakeNonNumerics
 │ │   │   │ │ │   │ ├TfrmGraphs.PadNonNum
 │ │   │   │ │ │   │ │ ├TfrmGraphs.StackNonNum
 │ │   │   │ │ │   │ │ └TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │   │ ├TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │   │ ├TfrmGraphs.PadLeftNonNumeric
 │ │   │   │ │ │   │ ├TfrmGraphs.ChartOnUndoZoom...
 │ │   │   │ │ │   │ └TfrmGraphs.MakeNonNumSeries
 │ │   │   │ │ │   │   └TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ │   ├TfrmGraphs.DisplayFreeText
 │ │   │   │ │ │   └TfrmGraphs.MakeComments
 │ │   │   │ │ │     └TfrmGraphs.MakeSeriesPoint
 │ │   │   │ │ └TfrmGraphs.AdjustTimeframe
 │ │   │   │ │   └TfrmGraphs.BottomAxis
 │ │   │   │ │     └..(rec)..
 │ │   │   │ ├TfrmGraphs.MakeTogetherMaybe
 │ │   │   │ │ ├TfrmGraphs.MakeSeparate...
 │ │   │   │ │ └TfrmGraphs.MakeTogether
 │ │   │   │ │   ├TfrmGraphs.GraphTypeNum
 │ │   │   │ │   ├TfrmGraphs.MakeChart...
 │ │   │   │ │   ├TfrmGraphs.PortionSize
 │ │   │   │ │   ├TfrmGraphs.SizeTogether
 │ │   │   │ │   ├TfrmGraphs.MakeTogetherNoLines
 │ │   │   │ │   │ ├TfrmGraphs.GraphTypeNum
 │ │   │   │ │   │ └TfrmGraphs.MakeDateline
 │ │   │   │ │   │   ├TfrmGraphs.MakeBarSeries...
 │ │   │   │ │   │   ├TfrmGraphs.MakeVisitGanttSeries...
 │ │   │   │ │   │   ├TfrmGraphs.MakePointSeries...
 │ │   │   │ │   │   └TfrmGraphs.MakeGanttSeries...
 │ │   │   │ │   ├TfrmGraphs.MakeTogetherOnlyLines
 │ │   │   │ │   │ ├TfrmGraphs.TitleInfo...
 │ │   │   │ │   │ ├TfrmGraphs.MakeLineSeries...
 │ │   │   │ │   │ └TfrmGraphs.DisplayFreeText
 │ │   │   │ │   ├TfrmGraphs.MakeTogetherAnyLines
 │ │   │   │ │   │ ├TfrmGraphs.SingleLabTest
 │ │   │   │ │   │ ├TfrmGraphs.TitleInfo...
 │ │   │   │ │   │ ├TfrmGraphs.GraphTypeNum
 │ │   │   │ │   │ ├TfrmGraphs.MakeLineSeries...
 │ │   │   │ │   │ ├TfrmGraphs.DisplayFreeText
 │ │   │   │ │   │ └TfrmGraphs.MakeDateline...
 │ │   │   │ │   ├TfrmGraphs.MakeOtherSeries...
 │ │   │   │ │   └TfrmGraphs.GraphBoundry
 │ │   │   │ │     ├TfrmGraphs.chartBaseMouseMove...
 │ │   │   │ │     └TfrmGraphs.AdjustTimeframe...
 │ │   │   │ └TfrmGraphs.DisplayDataInfo
 │ │   │   │   ├TfrmGraphs.ChangeStyle
 │ │   │   │   │ ├TfrmGraphs.ChartStyle
 │ │   │   │   │ │ └TfrmGraphs.HideDates
 │ │   │   │   │ └TfrmGraphs.ChartColor
 │ │   │   │   ├TfrmGraphs.InfoMessage
 │ │   │   │   └TfrmGraphs.MergedLabsSelected
 │ │   │   ├TfrmGraphs.lstViewsTopChange
 │ │   │   │ └TfrmGraphs.ViewsChange
 │ │   │   │   ├TfrmGraphs.InactivateHint
 │ │   │   │   ├TfrmGraphs.DisplayData...
 │ │   │   │   ├TfrmGraphs.CheckProfile
 │ │   │   │   │ ├GetGraphProfiles
 │ │   │   │   │ │ └rpcGetGraphProfiles
 │ │   │   │   │ │   └onoff
 │ │   │   │   │ ├GetATestGroup
 │ │   │   │   │ │ └rpcATestGroup
 │ │   │   │   │ ├TfrmGraphs.ExpandTax
 │ │   │   │   │ │ └rpcTaxonomy
 │ │   │   │   │ │   └onoff
 │ │   │   │   │ └TfrmGraphs.LoadDisplayCheck
 │ │   │   │   │   ├TfrmGraphs.TypeIsLoaded
 │ │   │   │   │   ├TfrmGraphs.LoadType
 │ │   │   │   │   │ ├TfrmGraphs.FileNameX
 │ │   │   │   │   │ └rpcGetItems
 │ │   │   │   │   │   └onoff
 │ │   │   │   │   ├TfrmGraphs.TypeIsDisplayed
 │ │   │   │   │   └TfrmGraphs.DisplayType
 │ │   │   │   │     └TfrmGraphs.FileNameX
 │ │   │   │   ├TfrmGraphs.cboDateRangeChange...
 │ │   │   │   ├TfrmGraphs.ViewDefinition
 │ │   │   │   ├TfrmGraphs.AssignProfile...
 │ │   │   │   ├TfrmGraphs.lvwItemsTopColumnClick
 │ │   │   │   ├TfrmGraphs.lvwItemsBottomColumnClick
 │ │   │   │   └TfrmGraphs.AutoSelect
 │ │   │   │     ├TfrmGraphs.lvwItemsTopClick...
 │ │   │   │     └TfrmGraphs.lvwItemsBottomClick
 │ │   │   │       ├GraphTurboOn
 │ │   │   │       ├TfrmGraphs.Switch...
 │ │   │   │       └TfrmGraphs.ItemsClick...
 │ │   │   └TfrmGraphs.lstViewsBottomChange
 │ │   │     └TfrmGraphs.ViewsChange...
 │ │   ├TfrmGraphs.HideGraphs
 │ │   ├TfrmGraphs.CheckToAddData...
 │ │   ├TfrmGraphs.DisplayData...
 │ │   └TfrmGraphs.ZoomUpdate
 │ │     ├TfrmGraphs.ZoomTo
 │ │     │ └TfrmGraphs.SizeDates...
 │ │     └TfrmGraphs.ZoomUpdateInfo...
 │ └TfrmGraphs.lvwItemsBottomClick...
 └SetWidth

Called-By Hierarchy


                 Layout
   TfrmGraphs.GetSize┘ 
TfrmGraphs.FormShow┘   

Calls

Name Declaration Comments
TfrmGraphs.chkDualViewsClick procedure chkDualViewsClick(Sender: TObject); -
SetWidth procedure SetWidth(aListView: TListView; v1, v2, v3, v4: integer); -
TfrmGraphs.splItemsTopMoved procedure splItemsTopMoved(Sender: TObject); -

Called-By

Name Declaration Comments
TfrmGraphs.GetSize procedure GetSize; -


Source

828   procedure Layout(name, FR: string; v1, v2, v3, v4: integer);
829   begin  // FR indicates Float or Report graph
830     if name = (FR + 'WIDTH') then
831     begin
832       if v1 > 0 then
833       begin
834         pnlItemsTop.Width := v1;
835         splItemsTopMoved(self);
836       end;
837     end
838     else if name = (FR + 'BOTTOM') then
839     begin
840       if v1 > 0 then
841       begin
842         chkDualViews.Checked := true;
843         chkDualViewsClick(self);
844         pnlBottom.Height := v1;
845       end;
846     end
847     else if name = (FR + 'COLUMN') then
848       SetWidth(lvwItemsTop, v1, v2, v3, v4)
849     else if name = (FR + 'BCOLUMN') then
850       SetWidth(lvwItemsBottom, v1, v2, v3, v4);
851   end;