object frmSelectDBObject: TfrmSelectDBObject Left = 0 Top = 0 Caption = 'Select database object ...' ClientHeight = 316 ClientWidth = 232 Color = clBtnFace Constraints.MinHeight = 250 Constraints.MinWidth = 200 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] Position = poOwnerFormCenter OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow DesignSize = ( 232 316) TextHeight = 14 object lblSelect: TLabel Left = 8 Top = 8 Width = 161 Height = 13 Caption = 'Select database, table or column:' end object lblCustom: TLabel Left = 8 Top = 239 Width = 210 Height = 13 Anchors = [akLeft, akBottom] Caption = '... or wildcard database (% and _ allowed):' end object TreeDBO: TVirtualStringTree Left = 8 Top = 27 Width = 216 Height = 206 Anchors = [akLeft, akTop, akRight, akBottom] Header.AutoSizeIndex = 0 Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs] Images = MainForm.VirtualImageListMain Indent = 16 Margin = 2 TabOrder = 0 TreeOptions.PaintOptions = [toHideFocusRect, toHotTrack, toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed] OnEnter = ValidateControls OnFocusChanged = TreeDBOFocusChanged OnGetText = TreeDBOGetText OnPaintText = TreeDBOPaintText OnGetImageIndex = TreeDBOGetImageIndex OnGetNodeDataSize = TreeDBOGetNodeDataSize OnInitChildren = TreeDBOInitChildren OnInitNode = TreeDBOInitNode Touch.InteractiveGestures = [igPan, igPressAndTap] Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough] Columns = < item Position = 0 Text = 'Name' Width = 212 end item Options = [coAllowClick, coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coAllowFocus] Position = 1 Text = 'Size' end> end object btnOK: TButton Left = 68 Top = 283 Width = 75 Height = 25 Anchors = [akRight, akBottom] Caption = 'OK' Default = True Enabled = False ModalResult = 1 TabOrder = 2 end object btnCancel: TButton Left = 149 Top = 283 Width = 75 Height = 25 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object editDb: TEdit Left = 8 Top = 255 Width = 216 Height = 21 Anchors = [akLeft, akRight, akBottom] TabOrder = 1 Text = 'editDb' TextHint = 'database' OnChange = ValidateControls OnEnter = ValidateControls end end