📄 tele.~dfm
字号:
object Form1: TForm1
Left = 363
Top = 247
Width = 431
Height = 190
BorderIcons = [biMinimize, biMaximize]
Caption = #21035#20851#36825#20010#31243#24207#65292#35745#36153#30340
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 48
Top = 136
Width = 300
Height = 13
Caption = #35745#12288#12288#12288#36153#12288#12288#12288#12288#12288#20013#12288#12288#12290#12290#12290#12290#12290#12290#12290#12290#12290#12290#12290#12290
Transparent = False
end
object Label2: TLabel
Left = 0
Top = 48
Width = 385
Height = 33
AutoSize = False
Caption = #22914#26524#20986#29616#38169#35823#25552#31034#65292#35831#25226#31243#24207#20851#25481#65292#20877#24320#21551#12290
Color = clTeal
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object BitBtn1: TBitBtn
Left = 0
Top = 2
Width = 75
Height = 25
Caption = #35745#36153
TabOrder = 0
Visible = False
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 80
Top = 2
Width = 75
Height = 25
Caption = 'BitBtn2'
TabOrder = 1
Visible = False
OnClick = BitBtn2Click
end
object DBGrid1: TDBGrid
Left = 10
Top = 32
Width = 359
Height = 97
DataSource = DataSource1
ImeName = #26234#33021#38472#26725#36755#20837#24179#21488' 5.5'
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Visible = False
end
object Edit1: TEdit
Left = 240
Top = 2
Width = 113
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #26234#33021#38472#26725#36755#20837#24179#21488' 5.5'
ParentFont = False
TabOrder = 3
Text = 'Edit1'
Visible = False
end
object DateTimePicker1: TDateTimePicker
Left = 160
Top = 3
Width = 73
Height = 21
Date = 38409.681446388900000000
Time = 38409.681446388900000000
ImeName = #26234#33021#38472#26725#36755#20837#24179#21488' 5.5'
TabOrder = 4
Visible = False
end
object Query1: TQuery
DatabaseName = 'CSDATA'
Left = 152
Top = 32
end
object Query22: TQuery
DatabaseName = 'TELEDATA'
Left = 184
Top = 32
end
object Query3: TQuery
DatabaseName = 'CSDATA'
Left = 248
Top = 48
end
object Query4: TQuery
DatabaseName = 'CSDATA'
Left = 288
Top = 48
end
object Query55: TQuery
DatabaseName = 'TELEDATA'
Left = 192
Top = 72
end
object database2: TDatabase
AliasName = 'hotel'
DatabaseName = 'CSDATA'
LoginPrompt = False
Params.Strings = (
'USER NAME=sa'
'PASSWORD=')
SessionName = 'Default'
Left = 176
Top = 8
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString = 'FILE NAME=tele.udl'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 48
Top = 72
end
object Query2: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 88
Top = 72
end
object Query5: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 120
Top = 72
end
object DataSource1: TDataSource
DataSet = Query2
Left = 8
Top = 72
end
object Timer1: TTimer
Enabled = False
Interval = 30000
OnTimer = BitBtn1Click
Left = 376
Top = 2
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -