?? frmhistoryqueryform.dfm
字號:
object HistoryQueryForm: THistoryQueryForm
Left = 257
Top = 186
Width = 697
Height = 480
Caption = #21382#21490#26597#35810
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 561
Height = 89
BorderStyle = bsSingle
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 32
Width = 64
Height = 16
Caption = #26597#35810#23383#27573
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 176
Top = 32
Width = 32
Height = 16
Caption = #35201#27714
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object ComboBox1: TComboBox
Left = 16
Top = 56
Width = 145
Height = 21
ItemHeight = 13
TabOrder = 0
Items.Strings = (
#25151#38388#21495
#22995#21517
#25509#24453#23545#35937
#20154#25968
#25151#20215
#26053#23458#31867#21035
#24615#21035)
end
object ComboBox2: TComboBox
Left = 176
Top = 56
Width = 145
Height = 21
ItemHeight = 13
TabOrder = 1
Items.Strings = (
'>'
'='
'<')
end
object Edit1: TEdit
Left = 344
Top = 56
Width = 201
Height = 21
TabOrder = 2
end
end
object Panel2: TPanel
Left = 568
Top = 0
Width = 121
Height = 89
BorderStyle = bsSingle
TabOrder = 1
OnClick = Panel2Click
object Button1: TButton
Left = 24
Top = 8
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 24
Top = 48
Width = 75
Height = 25
Caption = #21462#28040
TabOrder = 1
end
end
object Panel3: TPanel
Left = 0
Top = 96
Width = 689
Height = 353
BorderStyle = bsSingle
TabOrder = 2
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 689
Height = 353
Color = clInfoBk
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
object Query1: TQuery
Active = True
DatabaseName = 'rooms'
SQL.Strings = (
'select * from roominfo,touristinfo,grouptouristinfo')
Left = 656
Top = 416
end
object DataSource1: TDataSource
DataSet = Query1
Left = 656
Top = 384
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -