salnameset.dfm
来自「pasa人力资源考勤管理系统」· DFM 代码 · 共 146 行
DFM
146 行
object Formsalnameset: TFormsalnameset
Left = 186
Top = 42
Width = 482
Height = 520
BorderIcons = [biSystemMenu, biMinimize]
Caption = '薪资项目设定'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
Visible = True
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 41
Width = 474
Height = 452
Align = alClient
Caption = '薪资项目设定'
TabOrder = 0
object wwDBGrid1: TwwDBGrid
Left = 2
Top = 15
Width = 470
Height = 435
ControlType.Strings = (
'sys;CheckBox;true;false'
'flat;CustomEdit;'
'sysback;CheckBox;TRUE;FALSE'
'show;CheckBox;true;false')
PictureMasks.Strings = (
'flat'#9'#'#9'T'#9'T')
Selected.Strings = (
'name'#9'13'#9'英文'
'chinename'#9'15'#9'中文'
'flatback'#9'2'#9'标志'
'sysback'#9'4'#9'系统'
'changechinename'#9'18'#9'中文(用户自定义)'
'flat'#9'2'#9'标志'
'sys'#9'4'#9'系统'
'show'#9'4'#9'显示?')
IniAttributes.Delimiter = ';;'
TitleColor = clInfoBk
FixedCols = 4
ShowHorzScrollBar = True
Align = alClient
BorderStyle = bsNone
Color = clBtnHighlight
DataSource = DataMod.Dssalnameset
EditCalculated = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
ParentFont = False
TabOrder = 0
TitleAlignment = taLeftJustify
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clMaroon
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = [fsBold]
TitleLines = 1
TitleButtons = True
OnDrawDataCell = wwDBGrid1DrawDataCell
IndicatorColor = icBlack
FooterColor = clGreen
FooterCellColor = clCaptionText
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 474
Height = 41
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
object Label1: TLabel
Left = 112
Top = 16
Width = 89
Height = 13
AutoSize = False
Caption = '系统标志(0)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clFuchsia
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = Label1Click
end
object Label2: TLabel
Left = 205
Top = 16
Width = 91
Height = 13
AutoSize = False
Caption = '加项标志(1)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = Label1Click
end
object Label3: TLabel
Left = 300
Top = 16
Width = 101
Height = 13
AutoSize = False
Caption = '减项标志(2)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = Label1Click
end
object CheckBox1: TCheckBox
Left = 17
Top = 13
Width = 52
Height = 17
Caption = '默认'
TabOrder = 0
OnClick = CheckBox1Click
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?