📄 unit16.~dfm
字号:
object Form16: TForm16
Left = 178
Top = 87
Width = 657
Height = 399
Caption = #28155#21152#37202#24215#20449#24687
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 15
Top = 13
Width = 609
Height = 300
Caption = #36755#20837#26032#37202#24215#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clPurple
Font.Height = -19
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 32
Top = 48
Width = 70
Height = 14
Caption = #37202#24215#21517#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #20223#23435'_GB2312'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 336
Top = 48
Width = 70
Height = 14
Caption = #25152#22788#20301#32622#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #20223#23435'_GB2312'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 352
Top = 88
Width = 56
Height = 14
Caption = ' '#20215#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #20223#23435'_GB2312'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 40
Top = 88
Width = 63
Height = 14
Caption = ' '#26143#32423#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #20223#23435'_GB2312'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 32
Top = 120
Width = 70
Height = 14
Caption = #26381#21153#20171#32461#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #20223#23435'_GB2312'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 296
Top = 40
Width = 7
Height = 13
Caption = '*'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 128
Top = 40
Width = 161
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Edit2: TEdit
Left = 416
Top = 40
Width = 161
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Edit3: TEdit
Left = 128
Top = 80
Width = 161
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Edit4: TEdit
Left = 416
Top = 80
Width = 161
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object Memo1: TMemo
Left = 128
Top = 120
Width = 449
Height = 161
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Lines.Strings = (
'Memo1')
ParentFont = False
TabOrder = 4
end
end
object Button14: TButton
Left = 104
Top = 332
Width = 57
Height = 25
Caption = #28155#21152
TabOrder = 1
OnClick = Button14Click
end
object Button12: TButton
Left = 264
Top = 332
Width = 57
Height = 25
Caption = #37325#22635
TabOrder = 2
OnClick = Button12Click
end
object Button13: TButton
Left = 408
Top = 332
Width = 57
Height = 25
Caption = #21462#28040
TabOrder = 3
OnClick = Button13Click
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=lygl.mdb;Persist Se' +
'curity Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 71
Top = 253
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 31
Top = 229
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -