📄 unit8.~dfm
字号:
ParentFont = False
TabOrder = 12
object RadioButton4: TRadioButton
Left = 45
Top = 14
Width = 82
Height = 19
Caption = #30007
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton4Click
end
object RadioButton5: TRadioButton
Left = 141
Top = 15
Width = 59
Height = 16
Caption = #22899
TabOrder = 1
OnClick = RadioButton5Click
end
end
end
object GroupBox2: TGroupBox
Left = 16
Top = 277
Width = 537
Height = 153
Caption = #35746#25151#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 1
object Label12: TLabel
Left = 24
Top = 43
Width = 76
Height = 19
Caption = #30331#35760#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 268
Top = 44
Width = 76
Height = 19
Caption = #39044#35745#22825#25968
end
object Label14: TLabel
Left = 24
Top = 19
Width = 76
Height = 19
Caption = #25151#38388#32534#21495
end
object Label15: TLabel
Left = 268
Top = 16
Width = 76
Height = 19
Caption = #20303#25151#21333#20215
end
object Label16: TLabel
Left = 24
Top = 94
Width = 62
Height = 19
Caption = #25240#25187#29575' '
end
object Label17: TLabel
Left = 24
Top = 67
Width = 76
Height = 19
Caption = #20132#32435#25276#37329
end
object Label18: TLabel
Left = 24
Top = 119
Width = 43
Height = 19
Caption = #35828#26126' '
end
object Label19: TLabel
Left = 268
Top = 72
Width = 76
Height = 19
Caption = #20854#20182#36153#29992
end
object Edit11: TEdit
Left = 120
Top = 38
Width = 121
Height = 24
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object Edit12: TEdit
Left = 377
Top = 40
Width = 121
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = Edit12Change
end
object Edit13: TEdit
Left = 377
Top = 14
Width = 121
Height = 24
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object Edit14: TEdit
Left = 120
Top = 90
Width = 121
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
MaxLength = 3
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 3
OnChange = Edit14Change
OnExit = Edit14Exit
end
object Edit15: TEdit
Left = 120
Top = 64
Width = 121
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
MaxLength = 8
ParentFont = False
TabOrder = 4
OnChange = Edit15Change
end
object Edit16: TEdit
Left = 120
Top = 116
Width = 345
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
MaxLength = 50
ParentFont = False
TabOrder = 5
end
object ComboBox1: TComboBox
Left = 120
Top = 14
Width = 121
Height = 22
Style = csOwnerDrawVariable
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemHeight = 16
MaxLength = 6
ParentFont = False
TabOrder = 6
OnExit = ComboBox1Exit
end
object Edit17: TEdit
Left = 377
Top = 66
Width = 121
Height = 24
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
MaxLength = 8
ParentFont = False
TabOrder = 7
OnChange = Edit17Change
end
end
object GroupBox3: TGroupBox
Left = 16
Top = 230
Width = 415
Height = 44
Caption = #35746#25151#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 2
object RadioButton1: TRadioButton
Left = 43
Top = 18
Width = 83
Height = 21
Caption = #38047#28857#25151
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 149
Top = 17
Width = 103
Height = 21
Caption = #27491#24120#20303#23487
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = RadioButton2Click
end
object RadioButton3: TRadioButton
Left = 276
Top = 18
Width = 99
Height = 20
Caption = #39044#35746#23458#25151
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = RadioButton3Click
end
end
object BitBtn1: TBitBtn
Left = 441
Top = 237
Width = 111
Height = 39
Caption = #26597#35810#23458#25151
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 106
Top = 444
Width = 91
Height = 25
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = BitBtn2Click
end
object BitBtn3: TBitBtn
Left = 226
Top = 444
Width = 91
Height = 25
Caption = #26032#20449#24687
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = BitBtn3Click
end
object BitBtn4: TBitBtn
Left = 346
Top = 444
Width = 91
Height = 25
Caption = #36864#20986
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #21326#25991#34892#26999
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = BitBtn4Click
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\mindy paradise\p' +
'roject\mindyparadisehotel.mdb;Persist Security Info=False'
LoginPrompt = False
Provider = 'Microsoft.Jet.OLEDB.4.0'
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -