?? query.dfm
字號:
object Form1: TForm1
Left = 197
Top = 102
Width = 409
Height = 374
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 8
Top = 8
Width = 385
Height = 193
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DBGrid2: TDBGrid
Left = 8
Top = 208
Width = 385
Height = 129
DataSource = DataSource2
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object Table1: TTable
Active = True
DatabaseName = 'BCDEMOS'
TableName = 'customer.db'
Left = 216
Top = 88
end
object DataSource1: TDataSource
DataSet = Table1
Left = 168
Top = 88
end
object Query1: TQuery
Active = True
DatabaseName = 'BCDEMOS'
DataSource = DataSource1
SQL.Strings = (
'SELECT orders.CustNo,orders.OrderNo,Orders.SaleDate'
'FROM orders WHERE orders.CustNo=:CustNo;')
Left = 232
Top = 272
ParamData = <
item
DataType = ftFloat
Name = 'CustNo'
ParamType = ptUnknown
end>
end
object DataSource2: TDataSource
DataSet = Query1
Left = 192
Top = 272
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -