📄 uquerymaker.dfm
字号:
object frmQueryMaker: TfrmQueryMaker
Left = 282
Top = 199
Width = 718
Height = 540
BorderStyle = bsSizeToolWin
Caption = 'Query Maker {New project}'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnDestroy = FormDestroy
OnHide = FormHide
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 0
Top = 0
Width = 474
Height = 58
Alignment = taCenter
Caption =
'Drag && drop table(s) from main form list here'#13'or click here for' +
' Help'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = Label1Click
OnMouseEnter = Label1MouseEnter
OnMouseLeave = Label1MouseLeave
end
object sgColumns: TStringGrid
Left = 0
Top = 282
Width = 710
Height = 224
Align = alBottom
ColCount = 2
DefaultColWidth = 100
DefaultRowHeight = 16
RowCount = 12
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goColMoving, goThumbTracking]
PopupMenu = pmGrid
TabOrder = 0
OnClick = sgColumnsClick
OnColumnMoved = sgColumnsColumnMoved
OnContextPopup = sgColumnsContextPopup
OnDragDrop = sgColumnsDragDrop
OnDragOver = sgColumnsDragOver
OnDrawCell = sgColumnsDrawCell
OnMouseWheelDown = sgColumnsMouseWheelDown
OnMouseWheelUp = sgColumnsMouseWheelDown
OnSelectCell = sgColumnsSelectCell
RowHeights = (
16
16
16
16
16
16
16
16
16
16
16
16)
end
object ToolBar1: TToolBar
Left = 0
Top = 257
Width = 710
Height = 25
Align = alBottom
ButtonHeight = 18
ButtonWidth = 8
Caption = 'ToolBar1'
TabOrder = 1
object ToolButton1: TToolButton
Left = 0
Top = 2
Width = 8
Caption = 'ToolButton1'
Style = tbsSeparator
end
object cbDistinct: TCheckBox
Left = 8
Top = 2
Width = 100
Height = 18
Caption = 'Distinct'
TabOrder = 0
OnClick = cbDistinctClick
end
object cbIntoTable: TCheckBox
Left = 108
Top = 2
Width = 41
Height = 18
Caption = 'Into'
TabOrder = 3
OnClick = cbDistinctClick
end
object cbMemory: TCheckBox
Left = 149
Top = 2
Width = 64
Height = 18
Caption = 'Memory'
TabOrder = 5
OnClick = cbDistinctClick
end
object cbLowerCase: TCheckBox
Left = 213
Top = 2
Width = 100
Height = 18
Caption = 'Lower Case'
Checked = True
State = cbChecked
TabOrder = 1
OnClick = cbDistinctClick
end
object cbDoubleQuotes: TCheckBox
Left = 313
Top = 2
Width = 100
Height = 18
Caption = 'Double Quotes'
Checked = True
State = cbChecked
TabOrder = 2
OnClick = cbDistinctClick
end
object cbSaveComments: TCheckBox
Left = 413
Top = 2
Width = 100
Height = 18
Caption = 'Save comments'
Checked = True
State = cbChecked
TabOrder = 4
OnClick = cbDistinctClick
end
end
object pmGrid: TPopupMenu
Left = 288
Top = 299
object RemoveSelCol: TMenuItem
Caption = 'Remove Sel Col'
OnClick = RemoveSelColClick
end
object RemoveAllCols: TMenuItem
Caption = 'Remove All Cols'
OnClick = RemoveAllColsClick
end
end
object pmTable: TPopupMenu
OnPopup = pmTablePopup
Left = 153
Top = 99
object AddCalcFld: TMenuItem
Caption = 'Add Calc Field'
OnClick = AddCalcFldClick
end
object EditCalcFld: TMenuItem
Caption = 'Edit Calc Field'
OnClick = EditCalcFldClick
end
object DelCalcFld: TMenuItem
Caption = 'Del Calc Field'
OnClick = DelCalcFldClick
end
object N2: TMenuItem
Caption = '-'
end
object RemoveTable: TMenuItem
Caption = 'Remove Sel table'
OnClick = RemoveTableClick
end
object RemoveAllTbls: TMenuItem
Caption = 'Remove All tables'
OnClick = RemoveAllTblsClick
end
end
object pmJoin: TPopupMenu
OnPopup = pmJoinPopup
Left = 204
Top = 100
object Crossjoin: TMenuItem
AutoCheck = True
Caption = 'Cross join'
GroupIndex = 1
RadioItem = True
OnClick = CrossjoinClick
end
object Innerjoin: TMenuItem
Tag = 1
AutoCheck = True
Caption = 'Inner join'
Checked = True
GroupIndex = 1
RadioItem = True
OnClick = CrossjoinClick
end
object Leftouterjoin: TMenuItem
Tag = 2
AutoCheck = True
Caption = 'Left outer join'
GroupIndex = 1
RadioItem = True
OnClick = CrossjoinClick
end
object Rightouterjoin: TMenuItem
Tag = 3
AutoCheck = True
Caption = 'Right outer join'
GroupIndex = 1
RadioItem = True
OnClick = CrossjoinClick
end
object Fullouterjoin: TMenuItem
Tag = 4
AutoCheck = True
Caption = 'Full outer join'
GroupIndex = 1
RadioItem = True
OnClick = CrossjoinClick
end
object N1: TMenuItem
Caption = '-'
GroupIndex = 1
end
object Removejoin: TMenuItem
Tag = 5
Caption = 'Remove join'
GroupIndex = 1
OnClick = CrossjoinClick
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -