📄 uemployee.dfm
字号:
object frmEmployee: TfrmEmployee
Left = -4
Top = -4
Width = 808
Height = 580
Caption = #21592#24037#20449#24687
Color = clGray
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
KeyPreview = True
OldCreateOrder = False
Position = poDefault
Visible = True
OnActivate = FormActivate
OnClose = FormClose
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 2
Top = 30
Width = 215
Height = 520
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object DataDBGrid: TLBDBGrid
Left = 1
Top = 22
Width = 195
Height = 497
Align = alClient
BorderStyle = bsNone
Color = 16251903
DataSource = dmData.dsEmployee
Enabled = False
GridlineColor = clBackground
Options = [dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ShowScrollBars = False
SelectRowColor = 16774127
SelectRowFontColor = clHighlight
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = Action2Execute
OnKeyDown = DataDBGridKeyDown
Columns = <
item
Expanded = False
FieldName = 'NAME'
Width = 195
Visible = True
end>
end
object Panel5: TPanel
Left = 0
Top = 0
Width = 215
Height = 22
Align = alTop
Alignment = taLeftJustify
BevelOuter = bvNone
Caption = ' '#21592#24037#22995#21517
Color = 14581072
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Panel9: TPanel
Left = 0
Top = 22
Width = 1
Height = 497
Align = alLeft
BevelOuter = bvNone
Color = clBackground
TabOrder = 2
end
object Panel11: TPanel
Left = 0
Top = 519
Width = 215
Height = 1
Align = alBottom
BevelOuter = bvNone
Color = clBackground
TabOrder = 3
end
object LBDBScrollBar1: TLBDBScrollBar
Left = 196
Top = 22
Width = 19
Height = 497
Align = alRight
Color = 16774127
LineColor = clBackground
DownFontColor = clBlack
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Marlett'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
DataSource = dmData.sdsEmployee
end
end
object Panel3: TPanel
Left = 0
Top = 550
Width = 800
Height = 3
Align = alBottom
BevelOuter = bvNone
Color = 16251903
TabOrder = 1
end
object Panel4: TPanel
Left = 0
Top = 30
Width = 2
Height = 520
Align = alLeft
BevelOuter = bvNone
Color = 16251903
TabOrder = 2
end
object Panel8: TPanel
Left = 632
Top = 30
Width = 168
Height = 520
Align = alRight
BevelOuter = bvNone
Color = clWhite
TabOrder = 3
object Shape1: TShape
Left = 0
Top = 0
Width = 1
Height = 520
Align = alLeft
Brush.Color = 14282231
Pen.Color = 14282231
end
end
object plData: TPanel
Left = 217
Top = 30
Width = 415
Height = 520
Align = alClient
BevelOuter = bvNone
Color = clWhite
TabOrder = 4
object Shape2: TShape
Left = 8
Top = 0
Width = 398
Height = 21
Brush.Color = 14581072
Pen.Color = 14581072
end
object Shape18: TShape
Left = 8
Top = 267
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape17: TShape
Left = 8
Top = 250
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape16: TShape
Left = 8
Top = 233
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Label1: TLabel
Left = 11
Top = 5
Width = 52
Height = 12
Caption = #21592#24037#20449#24687
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Shape3: TShape
Left = 8
Top = 21
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape4: TShape
Left = 8
Top = 38
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape5: TShape
Left = 8
Top = 55
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape6: TShape
Left = 8
Top = 89
Width = 137
Height = 20
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape7: TShape
Left = 8
Top = 127
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape8: TShape
Left = 8
Top = 108
Width = 137
Height = 20
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape9: TShape
Left = 8
Top = 144
Width = 137
Height = 20
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape10: TShape
Left = 8
Top = 182
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Shape11: TShape
Left = 8
Top = 199
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Label6: TLabel
Left = 16
Top = 25
Width = 48
Height = 12
Caption = #32534' '#21495
Transparent = True
end
object Label8: TLabel
Left = 16
Top = 41
Width = 48
Height = 12
Caption = #22995' '#21517
Transparent = True
end
object Label9: TLabel
Left = 16
Top = 58
Width = 48
Height = 12
Caption = #36523#20221#35777#21495
Transparent = True
end
object Label10: TLabel
Left = 16
Top = 94
Width = 48
Height = 12
Caption = #24615' '#21035
Transparent = True
end
object Label11: TLabel
Left = 16
Top = 112
Width = 48
Height = 12
Caption = #23398' '#21382
Transparent = True
end
object Label13: TLabel
Left = 16
Top = 203
Width = 66
Height = 12
Caption = #38144#21806#25552#25104'(%)'
Transparent = True
end
object Label5: TLabel
Left = 16
Top = 130
Width = 48
Height = 12
Caption = #20986#29983#26085#26399
Transparent = True
end
object Label15: TLabel
Left = 16
Top = 148
Width = 48
Height = 12
Caption = #25152#22312#37096#38376
Transparent = True
end
object Label2: TLabel
Left = 16
Top = 186
Width = 48
Height = 12
Caption = #22522#26412#24037#36164
Transparent = True
end
object Label4: TLabel
Left = 16
Top = 236
Width = 48
Height = 12
Caption = #30005' '#35805
Transparent = True
end
object Label16: TLabel
Left = 16
Top = 270
Width = 48
Height = 12
Caption = #22791' '#27880
Transparent = True
end
object Label20: TLabel
Left = 16
Top = 254
Width = 48
Height = 12
Caption = #25163' '#26426
Transparent = True
end
object Shape19: TShape
Left = 8
Top = 72
Width = 137
Height = 18
Brush.Color = 16251903
Pen.Color = clBackground
end
object Label7: TLabel
Left = 16
Top = 75
Width = 48
Height = 12
Caption = #31821' '#36143
Transparent = True
end
object Shape20: TShape
Left = 8
Top = 163
Width = 137
Height = 20
Brush.Color = 16251903
Pen.Color = clBackground
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -