📄 tax.~dfm
字号:
object taxform: Ttaxform
Left = 300
Top = 206
Width = 411
Height = 273
Caption = #35774#32622#31246#29575
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 16
Top = 144
Width = 36
Height = 13
Caption = #20998#24449#28857
end
object Label2: TLabel
Left = 224
Top = 144
Width = 24
Height = 13
Caption = #31246#29575
end
object Label3: TLabel
Left = 24
Top = 176
Width = 24
Height = 13
Caption = #35828#26126
end
object DBGrid1: TDBGrid
Left = 16
Top = 8
Width = 369
Height = 120
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'division'
Title.Caption = #20998#24449#28857
Visible = True
end
item
Expanded = False
FieldName = 'rate'
Title.Caption = #31246#29575
Visible = True
end
item
Expanded = False
FieldName = 'note'
Title.Caption = #35828#26126
Visible = True
end>
end
object Edit1: TEdit
Left = 64
Top = 136
Width = 121
Height = 21
TabOrder = 1
end
object Edit2: TEdit
Left = 264
Top = 136
Width = 121
Height = 21
TabOrder = 2
end
object Edit3: TEdit
Left = 64
Top = 168
Width = 321
Height = 21
TabOrder = 3
end
object Button1: TButton
Left = 40
Top = 208
Width = 49
Height = 17
Caption = #22686#21152
TabOrder = 4
OnClick = Button1Click
end
object Button2: TButton
Left = 112
Top = 208
Width = 49
Height = 17
Caption = #21024#38500
TabOrder = 5
OnClick = Button2Click
end
object Button3: TButton
Left = 184
Top = 208
Width = 49
Height = 17
Caption = #20445#23384
TabOrder = 6
OnClick = Button3Click
end
object Button4: TButton
Left = 256
Top = 208
Width = 49
Height = 17
Caption = #36864#20986
TabOrder = 7
OnClick = Button4Click
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 104
Top = 72
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=wage.mdb;Persist Se' +
'curity Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 48
Top = 72
end
object ADOTable1: TADOTable
Connection = ADOConnection1
CursorType = ctStatic
AfterScroll = ADOTable1AfterScroll
TableDirect = True
TableName = 'tax'
Left = 152
Top = 72
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -