object frmTableTools: TfrmTableTools Left = 734 Top = 126 Caption = 'Table tools' ClientHeight = 383 ClientWidth = 544 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False Position = poMainFormCenter OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow DesignSize = ( 544 383) PixelsPerInch = 96 TextHeight = 13 object btnClose: TButton Left = 461 Top = 350 Width = 75 Height = 25 Anchors = [akRight, akBottom] Cancel = True Caption = 'Close' Default = True ModalResult = 2 TabOrder = 0 end object pnlTop: TPanel AlignWithMargins = True Left = 8 Top = 8 Width = 528 Height = 336 Margins.Left = 8 Margins.Top = 8 Margins.Right = 8 Margins.Bottom = 8 Align = alTop Anchors = [akLeft, akTop, akRight, akBottom] BevelOuter = bvNone TabOrder = 1 object spltHorizontally: TSplitter Left = 144 Top = 0 Width = 4 Height = 336 Cursor = crSizeWE ResizeStyle = rsUpdate end object TreeObjects: TVirtualStringTree Left = 0 Top = 0 Width = 144 Height = 336 Align = alLeft Header.AutoSizeIndex = 0 Header.DefaultHeight = 17 Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -11 Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs] Images = MainForm.PngImageListMain NodeDataSize = 0 TabOrder = 0 TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick] TreeOptions.PaintOptions = [toHotTrack, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed] OnChecked = TreeObjectsChecked OnGetText = TreeObjectsGetText OnGetImageIndex = TreeObjectsGetImageIndex OnInitChildren = TreeObjectsInitChildren OnInitNode = TreeObjectsInitNode Columns = < item Position = 0 Width = 144 WideText = 'Dummy, keeps compatibility to mainform.dbtree' end> end object pnlRight: TPanel Left = 148 Top = 0 Width = 380 Height = 336 Align = alClient BevelOuter = bvNone TabOrder = 1 object lblResults: TLabel AlignWithMargins = True Left = 0 Top = 164 Width = 380 Height = 13 Margins.Left = 0 Margins.Right = 0 Align = alTop Caption = 'Results:' end object ResultGrid: TVirtualStringTree Left = 0 Top = 180 Width = 380 Height = 156 Align = alClient Header.AutoSizeIndex = -1 Header.DefaultHeight = 17 Header.Font.Charset = DEFAULT_CHARSET Header.Font.Color = clWindowText Header.Font.Height = -11 Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.Images = MainForm.PngImageListMain Header.MainColumn = -1 Header.Options = [hoColumnResize, hoShowSortGlyphs, hoVisible] TabOrder = 0 TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoSort, toAutoTristateTracking, toAutoDeleteMovedNodes] TreeOptions.MiscOptions = [toAcceptOLEDrop, toFullRepaintOnResize, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick] TreeOptions.PaintOptions = [toHotTrack, toShowButtons, toShowDropmark, toShowHorzGridLines, toShowTreeLines, toShowVertGridLines, toThemeAware, toUseBlendedImages] TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect] OnCompareNodes = ResultGridCompareNodes OnGetText = ResultGridGetText OnPaintText = ResultGridPaintText OnGetNodeDataSize = ResultGridGetNodeDataSize OnHeaderClick = ResultGridHeaderClick OnInitNode = ResultGridInitNode Columns = <> end object PageControlTools: TPageControl Left = 0 Top = 0 Width = 380 Height = 161 ActivePage = Maintenance Align = alTop Images = MainForm.PngImageListMain TabOrder = 1 object Maintenance: TTabSheet Caption = 'Maintenance' ImageIndex = 39 DesignSize = ( 372 132) object lblOperation: TLabel Left = 3 Top = 14 Width = 52 Height = 13 Caption = 'Operation:' end object lblOptions: TLabel Left = 3 Top = 39 Width = 41 Height = 13 Caption = 'Options:' end object comboOperation: TComboBox Left = 80 Top = 11 Width = 289 Height = 21 Style = csDropDownList Anchors = [akLeft, akTop, akRight] ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'Check' OnChange = comboOperationChange Items.Strings = ( 'Check' 'Analyze' 'Checksum' 'Optimize' 'Repair') end object chkQuick: TCheckBox Left = 81 Top = 38 Width = 97 Height = 17 Caption = 'Quick' TabOrder = 1 OnClick = MaintenanceOptionClick end object chkFast: TCheckBox Left = 81 Top = 57 Width = 97 Height = 17 Caption = 'Fast' TabOrder = 2 OnClick = MaintenanceOptionClick end object chkMedium: TCheckBox Left = 81 Top = 76 Width = 97 Height = 17 Caption = 'Medium' TabOrder = 3 OnClick = MaintenanceOptionClick end object chkExtended: TCheckBox Left = 184 Top = 38 Width = 97 Height = 17 Caption = 'Extended' TabOrder = 4 OnClick = MaintenanceOptionClick end object chkChanged: TCheckBox Left = 184 Top = 57 Width = 97 Height = 17 Caption = 'Changed' TabOrder = 5 OnClick = MaintenanceOptionClick end object btnExecuteMaintenance: TButton Left = 80 Top = 99 Width = 75 Height = 25 Caption = 'Execute' TabOrder = 6 OnClick = ExecuteOperation end object chkUseFrm: TCheckBox Left = 184 Top = 76 Width = 97 Height = 17 Caption = 'Use FRM file' TabOrder = 7 OnClick = MaintenanceOptionClick end object btnHelp: TButton Left = 294 Top = 38 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = 'Help' TabOrder = 8 OnClick = btnHelpClick end end end end end end