171 lines
3.6 KiB
Plaintext
171 lines
3.6 KiB
Plaintext
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
|