📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 189
Top = 106
Width = 728
Height = 518
Caption = #30005#35805#25968#25454#25509#36716#31243#24207
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 20
object Label1: TLabel
Left = 32
Top = 40
Width = 681
Height = 20
AutoSize = False
Caption =
#36215#22987#26102#38388' '#26102#38271' '#20027#21483#21495' '#34987#21483#21495' '#35745#36153#33033 +
#20914' '#36153#29992#65288#20803#65289
end
object RICHEDIT1: TMemo
Left = 32
Top = 64
Width = 657
Height = 409
Color = clGray
TabOrder = 0
end
object Edit1: TEdit
Left = 17
Top = 2
Width = 121
Height = 28
Color = clNavy
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindow
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'Edit1'
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 24
Top = 216
end
object pubqry: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 240
Top = 16
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
'al Catalog=HOTEL;Data Source=server'
LoginPrompt = False
Provider = 'SQLOLEDB.1'
Left = 320
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -