📄 unit4.~dfm
字号:
object yonghuForm: TyonghuForm
Left = 226
Top = 130
Width = 540
Height = 484
Caption = #29992#25143#31649#29702
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 7
Top = 8
Width = 50
Height = 12
Caption = #25805#20316#21592#65306' '
end
object Edit1: TEdit
Left = 51
Top = 4
Width = 124
Height = 19
Ctl3D = False
ParentCtl3D = False
ReadOnly = True
TabOrder = 0
end
object DBGrid1: TDBGrid
Left = 13
Top = 264
Width = 508
Height = 185
Ctl3D = False
DataSource = DataSource1
Enabled = False
ParentCtl3D = False
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DBNavigator1: TDBNavigator
Left = 144
Top = 232
Width = 224
Height = 25
DataSource = DataSource1
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
TabOrder = 2
OnClick = DBNavigator1Click
end
object GroupBox1: TGroupBox
Left = 176
Top = 40
Width = 345
Height = 177
Caption = #29992#25143#20449#24687
Ctl3D = False
ParentCtl3D = False
TabOrder = 3
object Label2: TLabel
Left = 39
Top = 37
Width = 54
Height = 17
Caption = #29992#25143#21517#65306' '
end
object Label3: TLabel
Left = 51
Top = 68
Width = 45
Height = 13
Caption = #23494#30721#65306' '
end
object Label4: TLabel
Left = 26
Top = 100
Width = 75
Height = 13
Caption = #25152#22312#21333#20301#65306' '
end
object Label5: TLabel
Left = 3
Top = 132
Width = 105
Height = 13
Caption = #26368#21518#25805#20316#26102#38388#65306' '
end
object Edit2: TEdit
Left = 88
Top = 33
Width = 121
Height = 19
ReadOnly = True
TabOrder = 0
end
object Edit3: TEdit
Left = 88
Top = 65
Width = 121
Height = 19
TabOrder = 1
end
object Edit4: TEdit
Left = 89
Top = 97
Width = 120
Height = 19
TabOrder = 2
end
object Edit5: TEdit
Left = 88
Top = 129
Width = 121
Height = 19
ReadOnly = True
TabOrder = 3
end
object GroupBox2: TGroupBox
Left = 216
Top = 17
Width = 121
Height = 137
Caption = #29992#25143#26435#38480
TabOrder = 4
object CheckBox1: TCheckBox
Left = 16
Top = 32
Width = 97
Height = 17
Caption = #31649#29702#26435#38480
Enabled = False
TabOrder = 0
end
object CheckBox2: TCheckBox
Left = 16
Top = 64
Width = 97
Height = 17
Caption = #25805#20316#26435#38480
Enabled = False
TabOrder = 1
end
object CheckBox3: TCheckBox
Left = 16
Top = 96
Width = 97
Height = 17
Caption = #26597#35810#26435#38480
Enabled = False
TabOrder = 2
end
end
end
object GroupBox3: TGroupBox
Left = 8
Top = 40
Width = 161
Height = 177
Caption = #25805#20316#26639
Ctl3D = False
ParentCtl3D = False
TabOrder = 4
object Button1: TButton
Left = 78
Top = 144
Width = 75
Height = 25
Caption = #36820#22238
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 16
Top = 24
Width = 75
Height = 25
Caption = #28155#21152#29992#25143
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 16
Top = 64
Width = 75
Height = 25
Caption = #21024#38500#29992#25143
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 16
Top = 104
Width = 75
Height = 25
Caption = #20462#25913
TabOrder = 3
OnClick = Button4Click
end
end
object Button5: TButton
Left = 400
Top = 232
Width = 75
Height = 25
Caption = #26356#26032#25805#20316
TabOrder = 5
Visible = False
OnClick = Button5Click
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#20154#20107#31649#29702#31995#32479'.mdb;Persist ' +
'Security Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 72
Top = 336
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 184
Top = 8
end
object ADOQuery2: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 40
Top = 336
end
object DataSource1: TDataSource
DataSet = ADOQuery2
Left = 8
Top = 344
end
object Timer1: TTimer
Interval = 100
OnTimer = Timer1Timer
Left = 248
Top = 8
end
object ADOQuery3: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 312
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -