📄 unit8.dfm
字号:
object Form8: TForm8
Left = 175
Top = 76
BorderStyle = bsNone
Caption = '本年度工资统计'
ClientHeight = 351
ClientWidth = 503
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 XP_Form1: TXP_Form
Left = 0
Top = 0
Width = 503
Height = 351
BtnClose = True
BtnMax = False
BtnMin = False
BtnHelp = False
IconOffSet = 0
CaptionOffSet = 0
BorderStyle = bsSizeable
Magnet = 0
TopMost = False
BoldCaption = True
ClientPanel = Panel1
UseSystemFont = True
CaptionShadow = True
PictureTrans = False
PictureTransColor = clBlack
Color = 15136504
end
object Panel1: TPanel
Left = 3
Top = 29
Width = 497
Height = 319
BevelOuter = bvNone
TabOrder = 0
object Label17: TLabel
Left = 337
Top = 232
Width = 43
Height = 16
Caption = '合计:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 17
Top = 10
Width = 117
Height = 16
Caption = '选择查看工资的年份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Panel2: TPanel
Left = 6
Top = 37
Width = 481
Height = 169
TabOrder = 0
object Label1: TLabel
Left = 23
Top = 18
Width = 39
Height = 16
Caption = '一月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 170
Top = 19
Width = 39
Height = 16
Caption = '二月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 317
Top = 17
Width = 39
Height = 16
Caption = '三月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 24
Top = 55
Width = 39
Height = 16
Caption = '四月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 321
Top = 57
Width = 39
Height = 16
Caption = '六月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 172
Top = 55
Width = 39
Height = 16
Caption = '五月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 322
Top = 97
Width = 39
Height = 16
Caption = '九月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 23
Top = 134
Width = 39
Height = 16
Caption = '十月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 23
Top = 95
Width = 39
Height = 16
Caption = '七月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 171
Top = 95
Width = 39
Height = 16
Caption = '八月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 166
Top = 135
Width = 52
Height = 16
Caption = '十一月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 317
Top = 136
Width = 52
Height = 16
Caption = '十二月份'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBEdit1: TDBEdit
Left = 65
Top = 13
Width = 97
Height = 21
DataField = '一月份'
DataSource = DataSource1
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 216
Top = 13
Width = 97
Height = 21
DataField = '二月份'
DataSource = DataSource1
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 368
Top = 13
Width = 97
Height = 21
DataField = '三月份'
DataSource = DataSource1
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 66
Top = 52
Width = 97
Height = 21
DataField = '四月份'
DataSource = DataSource1
TabOrder = 3
end
object DBEdit5: TDBEdit
Left = 217
Top = 50
Width = 97
Height = 21
DataField = '五月份'
DataSource = DataSource1
TabOrder = 4
end
object DBEdit6: TDBEdit
Left = 371
Top = 53
Width = 97
Height = 21
DataField = '六月份'
DataSource = DataSource1
TabOrder = 5
end
object DBEdit7: TDBEdit
Left = 66
Top = 92
Width = 97
Height = 21
DataField = '七月份'
DataSource = DataSource1
TabOrder = 6
end
object DBEdit8: TDBEdit
Left = 218
Top = 91
Width = 97
Height = 21
DataField = '八月份'
DataSource = DataSource1
TabOrder = 7
end
object DBEdit9: TDBEdit
Left = 372
Top = 93
Width = 97
Height = 21
DataField = '九月份'
DataSource = DataSource1
TabOrder = 8
end
object DBEdit10: TDBEdit
Left = 65
Top = 131
Width = 97
Height = 21
DataField = '十月份'
DataSource = DataSource1
TabOrder = 9
end
object DBEdit11: TDBEdit
Left = 218
Top = 130
Width = 97
Height = 21
DataField = '十一月份'
DataSource = DataSource1
TabOrder = 10
end
object DBEdit12: TDBEdit
Left = 374
Top = 133
Width = 97
Height = 21
DataField = '十二月份'
DataSource = DataSource1
TabOrder = 11
end
end
object Panel3: TPanel
Left = 8
Top = 213
Width = 321
Height = 65
TabOrder = 1
object Label13: TLabel
Left = 16
Top = 10
Width = 33
Height = 16
Caption = '扣款1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 16
Top = 38
Width = 33
Height = 16
Caption = '扣款2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 156
Top = 12
Width = 26
Height = 16
Caption = '其它'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 155
Top = 39
Width = 52
Height = 16
Caption = '应发工资'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBEdit13: TDBEdit
Left = 51
Top = 6
Width = 97
Height = 21
TabOrder = 0
end
object DBEdit14: TDBEdit
Left = 51
Top = 35
Width = 97
Height = 21
TabOrder = 1
end
object DBEdit15: TDBEdit
Left = 214
Top = 7
Width = 97
Height = 21
TabOrder = 2
end
object DBEdit16: TDBEdit
Left = 214
Top = 35
Width = 97
Height = 21
TabOrder = 3
end
end
object DBEdit17: TDBEdit
Left = 379
Top = 227
Width = 97
Height = 21
TabOrder = 2
end
object Button1: TButton
Left = 426
Top = 283
Width = 57
Height = 25
Caption = '退 出'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = Button1Click
end
object Button2: TButton
Left = 369
Top = 283
Width = 57
Height = 25
Caption = '修 改'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = Button2Click
end
object Button3: TButton
Left = 312
Top = 283
Width = 57
Height = 25
Caption = '取 消'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
Visible = False
OnClick = Button3Click
end
object Button4: TButton
Left = 254
Top = 283
Width = 57
Height = 25
Caption = '保 存'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
Visible = False
OnClick = Button4Click
end
object ComboBox1: TComboBox
Left = 143
Top = 6
Width = 58
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 7
Text = '2003'
Items.Strings = (
'1999'
'2000'
'2001'
'2002'
'2003'
'2004'
'2005'
'2006'
'2007'
'2008'
'2009'
'2010')
end
end
object Table1: TTable
DatabaseName = 'F:\zqw\workdir'
TableName = '工资表.db'
Left = 193
Top = 70
end
object DataSource1: TDataSource
DataSet = Table1
Left = 329
Top = 78
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -