object DBFrame: TDBFrame Left = 0 Top = 0 Width = 689 Height = 339 TabOrder = 0 object spl2: TSplitter Left = 169 Top = 0 Height = 339 end object pnlRight: TPanel Left = 172 Top = 0 Width = 517 Height = 339 Align = alClient TabOrder = 0 object spl1: TSplitter Left = 1 Top = 113 Width = 515 Height = 3 Cursor = crVSplit Align = alTop end object pnlTop: TPanel Left = 1 Top = 1 Width = 515 Height = 112 Align = alTop Constraints.MinHeight = 100 TabOrder = 0 DesignSize = ( 515 112) object mmoSQL: TMemo Left = 0 Top = 0 Width = 454 Height = 111 Anchors = [akLeft, akTop, akRight, akBottom] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Consolas' Font.Style = [] ParentFont = False TabOrder = 0 end object btnExec: TButton Left = 461 Top = 8 Width = 43 Height = 25 Hint = 'Execute the SQL statement (F9)' Anchors = [akTop, akRight] Caption = 'Exec' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = btnExecClick end object btnHistory: TButton Left = 461 Top = 40 Width = 43 Height = 25 Hint = 'View SQL log history (Ctrl+H)' Anchors = [akTop, akRight] Caption = 'History' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = btnHistoryClick end object btnCmd: TButton Left = 461 Top = 72 Width = 43 Height = 25 Hint = 'Launch a pseudo-command (F5)' Anchors = [akTop, akRight] Caption = '#cmd' ParentShowHint = False PopupMenu = pmCmd ShowHint = True TabOrder = 3 OnClick = btnCmdClick end end object drwgrdResult: TDrawGrid Left = 1 Top = 116 Width = 515 Height = 117 Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 Visible = False OnClick = drwgrdResultClick end end object pnlLeft: TPanel Left = 0 Top = 0 Width = 169 Height = 339 Align = alLeft TabOrder = 1 object lstTables: TListBox Left = 1 Top = 45 Width = 167 Height = 293 Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [] ItemHeight = 14 ParentFont = False TabOrder = 0 OnDblClick = lstTablesDblClick end object pnlLeftTop: TPanel Left = 1 Top = 1 Width = 167 Height = 44 Align = alTop TabOrder = 1 DesignSize = ( 167 44) object edtLabels: TEdit Left = 5 Top = 4 Width = 156 Height = 21 Hint = 'Incremental Search' Anchors = [akLeft, akTop, akRight] ParentShowHint = False ShowHint = True TabOrder = 0 OnChange = edtLabelsChange end object chkTables: TCheckBox Left = 8 Top = 26 Width = 156 Height = 17 Caption = 'chkTables' TabOrder = 1 Visible = False end end end object pmCmd: TPopupMenu Left = 648 Top = 80 end end