object frmResults: TfrmResults Left = 311 Top = 119 Width = 441 Height = 214 Caption = 'frmResults' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsMDIChild Icon.Data = {} Menu = MainMenu Position = poDefault Visible = True WindowState = wsMinimized OnClose = FormClose OnCloseQuery = FormCloseQuery OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object TTreeView Left = 0 Top = 0 Width = 69 Height = 105 ReadOnly = True Indent = 19 Items.Data = { 040000001D0000000000000000000000FFFFFFFFFFFFFFFF0000000000000000 04746573741E0000000000000000000000FFFFFFFFFFFFFFFF00000000030000 000574657374321E0000000000000000000000FFFFFFFFFFFFFFFF0000000000 0000000573756220311E0000000000000000000000FFFFFFFFFFFFFFFF000000 0000000000057375622032190000000000000000000000FFFFFFFFFFFFFFFF00 00000000000000001E0000000000000000000000FFFFFFFFFFFFFFFF00000000 000000000574657374331E0000000000000000000000FFFFFFFFFFFFFFFF0000 000000000000057465737434} Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False TabOrder = 0 ParentFont = False Images = imgSmall StateImages = imgSmall end object TListView Left = 96 Top = -24 Width = 57 Height = 129 Columns = < item Caption = 'Name' end item Caption = 'Size' end> ReadOnly = True IconOptions.AutoArrange = True TabOrder = 1 ViewStyle = vsReport LargeImages = imgLarge SmallImages = imgSmall end object pnlLeft: TPanel Left = 0 Top = 0 Width = 201 Height = 163 Align = alLeft BevelOuter = bvNone Caption = 'pnlLeft' TabOrder = 2 object pnlLeftCaption: TPanel Left = 0 Top = 0 Width = 201 Height = 25 Align = alTop Alignment = taLeftJustify BevelInner = bvLowered BevelOuter = bvNone BorderWidth = 1 Caption = ' Folder tree sizes' TabOrder = 0 end object pnlLeftContainer: TPanel Left = 0 Top = 25 Width = 201 Height = 138 Align = alClient BevelInner = bvLowered BevelOuter = bvNone BorderWidth = 1 Caption = 'pnlLeftContainer' TabOrder = 1 object olDirTree: TTreeView Left = 2 Top = 2 Width = 197 Height = 134 BorderStyle = bsNone ReadOnly = True Indent = 19 OnChange = olDirTreeChange Align = alClient ParentColor = False TabOrder = 0 Images = imgSmall end end end object pnlCentre: TPanel Left = 201 Top = 0 Width = 2 Height = 163 Cursor = crHSplit Align = alLeft BevelOuter = bvNone TabOrder = 3 OnMouseDown = pnlCentreMouseDown OnMouseMove = pnlCentreMouseMove OnMouseUp = pnlCentreMouseUp end object pnlRight: TPanel Left = 203 Top = 0 Width = 230 Height = 163 Align = alClient BevelOuter = bvNone Caption = 'pnlRight' TabOrder = 4 object pnlRightCaption: TPanel Left = 0 Top = 0 Width = 230 Height = 25 Align = alTop Alignment = taLeftJustify BevelInner = bvLowered BevelOuter = bvNone BorderWidth = 1 TabOrder = 0 end object pnlRightContainer: TPanel Left = 0 Top = 25 Width = 230 Height = 138 Align = alClient BevelInner = bvLowered BevelOuter = bvNone BorderWidth = 1 Caption = 'pnlRightContainer' TabOrder = 1 object lvwDirs: TListView Left = 2 Top = 2 Width = 263 Height = 134 Align = alLeft BorderStyle = bsNone OnDblClick = lvwDirsDblClick Columns = < item Caption = 'Name' Width = 100 end item Alignment = taRightJustify Caption = 'Size' Width = 70 end item Alignment = taRightJustify Caption = 'Allocated' Width = 70 end item Alignment = taRightJustify Caption = 'Wasted' Width = 70 end item Caption = 'Modified' Width = 120 end> ReadOnly = True OnColumnClick = lvwDirsColumnClick PopupMenu = pmnuListView TabOrder = 0 ViewStyle = vsReport LargeImages = imgLarge SmallImages = imgSmall end object Chart1: TChartfx Left = 16 Top = 28 Width = 421 Height = 125 TabOrder = 1 ControlData = { 832B0000EB0C000060000000000001055C3100FFFF8FFD380032002800280003 00000000000000080001000000000000000000000000000200000000FFFF00C0 C0C000C0C0C000FFFFFF00FC3FFF1F000000000001000009000A000000080000 2008000060080000000800000008000000080000000800000008000000080000 0000000000000000000000000000000000000000000000000000000000000000 0002000000006402000000006402000000006402000000006400000000000000 00000000000000F03F0000040000000000000000000000000000005940000000 0000000000000000000000000000000000} end end end object pnlSlider: TPanel Left = 184 Top = 44 Width = 9 Height = 129 BevelOuter = bvNone Caption = ' ' Color = clBlack TabOrder = 5 Visible = False end object MainMenu: TMainMenu Left = 6 Top = 55 object mnuFile: TMenuItem Caption = '&File' ShortCut = 0 object mnuFSave: TMenuItem Caption = '&Save Result' ShortCut = 16467 Visible = False OnClick = mnuFSaveClick end object mnuFSaveAs: TMenuItem Caption = '&Save Result Tree As...' ShortCut = 16467 OnClick = mnuFSaveAsClick end object mnuFSaveResultListAs: TMenuItem Caption = 'Save Result &List As...' ShortCut = 0 OnClick = mnuFSaveResultListAsClick end object mnuFOpenChartTemplate: TMenuItem Caption = 'Open Chart Template...' ShortCut = 0 OnClick = mnuFOpenChartTemplateClick end object mnuFSaveChartTemplateAs: TMenuItem Caption = 'Save Chart Template As...' ShortCut = 0 OnClick = mnuFSaveChartTemplateAsClick end object mnuFClose: TMenuItem Caption = '&Close' ShortCut = 0 OnClick = mnuFCloseClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object mnuFPrint: TMenuItem Caption = '&Print Chart...' ShortCut = 16464 OnClick = mnuFPrintClick end object mnuFPrintSetup: TMenuItem Caption = 'P&rint Setup...' ShortCut = 0 Visible = False OnClick = mnuFPrintSetupClick end object N6: TMenuItem Caption = '-' ShortCut = 0 end object mnuFProperties: TMenuItem Caption = 'P&roperties...' ShortCut = 0 OnClick = mnuFPropertiesClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object mnuFStop: TMenuItem Caption = 'St&op' ShortCut = 16474 OnClick = mnuFStopClick end object N4: TMenuItem Caption = '-' ShortCut = 0 end object mnuFExit: TMenuItem Caption = 'E&xit' ShortCut = 16472 OnClick = mnuFExitClick end end object mnuView: TMenuItem Caption = '&View' GroupIndex = 1 HelpContext = 1801 ShortCut = 0 object mnuVToolbar: TMenuItem Caption = '&Toolbar' GroupIndex = 2 ShortCut = 0 OnClick = mnuVBarClick end object mnuVResultBar: TMenuItem Caption = '&Result Bar' GroupIndex = 2 ShortCut = 0 OnClick = mnuVBarClick end object mnuVStatusBar: TMenuItem Caption = 'Stat&us Bar' GroupIndex = 2 ShortCut = 0 OnClick = mnuVBarClick end object mnuVColourBar: TMenuItem Caption = 'C&olour Bar' GroupIndex = 2 ShortCut = 0 OnClick = mnuVBarClick end object mnuVPatternBar: TMenuItem Caption = 'Pa&tter&n Bar' GroupIndex = 2 ShortCut = 0 OnClick = mnuVBarClick end object mnuVLegend: TMenuItem Caption = 'Le&gend' GroupIndex = 2 ShortCut = 0 OnClick = mnuVLegendClick end object N8: TMenuItem Caption = '-' GroupIndex = 2 ShortCut = 0 end object mnuVLargeIcons: TMenuItem Caption = 'Lar&ge Icons' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object mnuVSmallIcons: TMenuItem Tag = 1 Caption = 'S&mall Icons' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object mnuVList: TMenuItem Tag = 2 Caption = '&List' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object mnuVDetails: TMenuItem Tag = 3 Caption = '&Details' Checked = True GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object mnuVPie: TMenuItem Caption = '&Pie Chart' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetChartClick end object mnuVVBar: TMenuItem Caption = 'Bar Chart (&Column)' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetChartClick end object mnuVHBar: TMenuItem Caption = 'Bar Chart (&Horizontal)' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetChartClick end object mnuVArea: TMenuItem Caption = '&Area Chart' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetChartClick end object mnuVLine: TMenuItem Caption = '&Line Chart' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetChartClick end object mnuVSpline: TMenuItem Caption = '&Spline Chart' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetChartClick end object N7: TMenuItem Caption = '-' GroupIndex = 2 ShortCut = 0 end object mnuVArrangeIcons: TMenuItem Caption = 'Arrange &Icons' GroupIndex = 2 ShortCut = 0 object mnuVAName: TMenuItem Caption = 'by &Name' ShortCut = 0 OnClick = mnuArrangeIconsClick end object mnuVASize: TMenuItem Caption = 'by &Size' ShortCut = 0 OnClick = mnuArrangeIconsClick end object mnuVAAllocated: TMenuItem Caption = 'by &Allocated' ShortCut = 0 OnClick = mnuArrangeIconsClick end object mnuVAWasted: TMenuItem Caption = 'by &Wasted' ShortCut = 0 OnClick = mnuArrangeIconsClick end object mnuVADate: TMenuItem Caption = 'by &Date' ShortCut = 0 OnClick = mnuArrangeIconsClick end end end object mnuChart: TMenuItem Caption = '&Chart' GroupIndex = 2 ShortCut = 0 object mnuCCopyChart: TMenuItem Caption = 'Copy Chart to Clipboard' GroupIndex = 1 ShortCut = 0 OnClick = mnuCCopyChartClick end object mnuCCopyData: TMenuItem Caption = 'Copy Data to Clipboard' GroupIndex = 1 ShortCut = 0 OnClick = mnuCCopyDataClick end object N3: TMenuItem Caption = '-' GroupIndex = 2 ShortCut = 0 end object mnuC3D: TMenuItem Caption = '&3D' GroupIndex = 2 ShortCut = 0 OnClick = mnuC3DClick end object mnuC3DView: TMenuItem Caption = '3D Vie&w' GroupIndex = 2 ShortCut = 0 OnClick = mnuC3DViewClick end object mnuCRotate3DView: TMenuItem Caption = '&Rotate 3D View...' GroupIndex = 2 ShortCut = 0 OnClick = mnuCRotate3DViewClick end object N5: TMenuItem Caption = '-' GroupIndex = 2 ShortCut = 0 end object mnuCTitles: TMenuItem Caption = '&Titles' GroupIndex = 2 ShortCut = 0 object mnuCTTop: TMenuItem Caption = '&Top' ShortCut = 0 OnClick = TitlesClick end object mnuCTAxis: TMenuItem Caption = '&Axis' ShortCut = 0 OnClick = TitlesClick end end object mnuCFonts: TMenuItem Caption = '&Fonts' GroupIndex = 2 ShortCut = 0 object mnuCFLegend: TMenuItem Caption = '&Legend...' ShortCut = 0 OnClick = SetFonts end object mnuCFXLegend: TMenuItem Caption = '&X Legend...' ShortCut = 0 OnClick = SetFonts end object mnuCFYLegend: TMenuItem Caption = '&Y Legend...' ShortCut = 0 OnClick = SetFonts end object N9: TMenuItem Caption = '-' ShortCut = 0 end object mnuCFTopTitle: TMenuItem Caption = '&Top Title...' ShortCut = 0 OnClick = SetFonts end object mnuCFAxisTitle: TMenuItem Caption = '&Axis Title...' ShortCut = 0 OnClick = SetFonts end end object mnuCOptions: TMenuItem Caption = '&Options...' GroupIndex = 2 ShortCut = 0 OnClick = mnuCOptionsClick end end end object PrintDialog: TPrintDialog Left = 72 Top = 56 end object PrinterSetupDialog: TPrinterSetupDialog Left = 104 Top = 56 end object imgSmall: TImageList Left = 136 Top = 56 end object imgLarge: TImageList Height = 32 Width = 32 Left = 164 Top = 56 end object pmnuListView: TPopupMenu Left = 20 Top = 111 object pmnuLargeIcons: TMenuItem Caption = 'Lar&ge Icons' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object pmnuSmallIcons: TMenuItem Tag = 1 Caption = 'S&mall Icons' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object pmnuList: TMenuItem Tag = 2 Caption = '&List' GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object pmnuDetails: TMenuItem Tag = 3 Caption = '&Details' Checked = True GroupIndex = 2 RadioItem = True ShortCut = 0 OnClick = SetViewClick end object pmnuArrangeIcons: TMenuItem Caption = 'Arrange &Icons' GroupIndex = 2 ShortCut = 0 object pmnuAName: TMenuItem Caption = 'by &Name' ShortCut = 0 OnClick = mnuArrangeIconsClick end object pmnuASize: TMenuItem Caption = 'by Si&ze' ShortCut = 0 OnClick = mnuArrangeIconsClick end object pmnuAAllocated: TMenuItem Caption = 'by &Allocated' ShortCut = 0 OnClick = mnuArrangeIconsClick end object pmnuAWasted: TMenuItem Caption = 'by &Wasted' ShortCut = 0 OnClick = mnuArrangeIconsClick end object pmnuADate: TMenuItem Caption = 'by &Date' ShortCut = 0 OnClick = mnuArrangeIconsClick end end end end