📄 frmsalaryprint.dfm
字号:
object SalaryPrintForm: TSalaryPrintForm
Left = 189
Top = 102
Width = 637
Height = 514
Caption = #24037#36164#25171#21360
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
PixelsPerInch = 96
TextHeight = 12
object panChild: TPanel
Left = 0
Top = 0
Width = 629
Height = 487
Align = alClient
BevelInner = bvLowered
TabOrder = 0
DesignSize = (
629
487)
object cmdClose: TButton
Left = 544
Top = 448
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = #20851#38381
TabOrder = 0
OnClick = cmdCloseClick
end
object GroupBox1: TGroupBox
Left = 16
Top = 8
Width = 601
Height = 425
Anchors = [akLeft, akTop, akRight, akBottom]
Caption = #24037#36164#34920
TabOrder = 1
DesignSize = (
601
425)
object DBGrid1: TDBGrid
Left = 8
Top = 16
Width = 585
Height = 401
Anchors = [akLeft, akTop, akRight, akBottom]
DataSource = dmDataSource.dsSalary
ImeName = #20013#25991' ('#31616#20307') - '#20116#31508#21152#21152
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'ID'
Title.Caption = #24037#36164#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'PERSON_ID'
Title.Caption = #32844#24037#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'PERSON_NAME'
Title.Caption = #22995#21517
Visible = True
end
item
Expanded = False
FieldName = 'BASE_SALARY'
Title.Caption = #22522#26412#24037#36164
Visible = True
end
item
Expanded = False
FieldName = 'DEPARTMENT_SALARY'
Title.Caption = #23703#20301#27941#36148
Visible = True
end
item
Expanded = False
FieldName = 'VOCATION_SALARY'
Title.Caption = #32844#21153#27941#36148
Visible = True
end
item
Expanded = False
FieldName = 'BONUS'
Title.Caption = #22870#37329
Visible = True
end
item
Expanded = False
FieldName = 'MULCT'
Title.Caption = #25187#27454
Visible = True
end
item
Expanded = False
FieldName = 'SHOULD_PAY_SALARY'
Title.Caption = #24212#21457#24037#36164
Visible = True
end
item
Expanded = False
FieldName = 'REAL_PAY_SALARY'
Title.Caption = #23454#21457#24037#36164
Visible = True
end>
end
end
object cmdPrintView: TButton
Left = 451
Top = 448
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = #25171#21360#39044#35272
TabOrder = 2
OnClick = cmdPrintViewClick
end
object cmdPrint: TButton
Left = 376
Top = 448
Width = 75
Height = 25
Anchors = [akRight, akBottom]
Caption = #25171#21360
TabOrder = 3
OnClick = cmdPrintClick
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -