📄 transfer.dfm
字号:
inherited frmTransfer: TfrmTransfer
Left = 69
Top = 107
ActiveControl = CoolBar1
Caption = '调动单'
ClientHeight = 420
ClientWidth = 705
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
inherited sbBar: TStatusBar
Top = 398
Width = 705
end
inherited CoolBar1: TCoolBar
Width = 705
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 705
end>
inherited tbMainBar: TToolBar
Width = 692
inherited tbDeleteHead: TToolButton
Visible = False
end
end
end
object sgTransfer: TSDGrid [2]
Left = 0
Top = 39
Width = 325
Height = 359
Align = alLeft
Color = clWhite
Ctl3D = False
DefaultRowHeight = 22
FixedColor = 8564917
FixedCols = 0
RowCount = 1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = '宋体'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
ParentCtl3D = False
ParentFont = False
TabOrder = 2
OnClick = sgTransferClick
SelectColor = clBackground
EvenGridColor = clWhite
OddGridColor = clWhite
Columns = <
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -13
ColumnFont.Name = '宋体'
ColumnFont.Style = []
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -13
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '调动单'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -13
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '员工号'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -13
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '原部门'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clNavy
ColumnFont.Height = -13
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '新部门'
ColumnWidth = 0
end>
ColWidths = (
10
72
73
77
79)
end
object FloatPanel1: TFloatPanel [3]
Left = 325
Top = 39
Width = 380
Height = 359
Align = alClient
Color = clWhite
Caption = 'FloatPanel1'
ParentColor = False
TabOrder = 3
object Label1: TLabel
Left = 12
Top = 15
Width = 60
Height = 12
Caption = '调动单号:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 10
Top = 40
Width = 60
Height = 12
Caption = '员工编号:'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 192
Top = 69
Width = 60
Height = 12
Caption = '制单日期:'
end
object Label4: TLabel
Left = 192
Top = 102
Width = 60
Height = 12
Caption = '生效日期:'
end
object Label5: TLabel
Left = 36
Top = 69
Width = 36
Height = 12
Caption = '主管:'
end
object Label9: TLabel
Left = 36
Top = 101
Width = 36
Height = 12
Caption = '状态:'
end
object Label13: TLabel
Left = 179
Top = 254
Width = 60
Height = 12
Caption = '系统日期:'
end
object Label14: TLabel
Left = 24
Top = 256
Width = 48
Height = 12
Caption = '操作员:'
end
object Label15: TLabel
Left = 35
Top = 287
Width = 36
Height = 12
Caption = '备注:'
end
object lbTransferUser: TLabel
Left = 76
Top = 256
Width = 84
Height = 12
Caption = 'lbTransferUser'
end
object lbTransferSysDate: TLabel
Left = 248
Top = 252
Width = 102
Height = 12
Caption = 'lbTransferSysDate'
end
object seTransferCode: TSDEdit
Left = 72
Top = 13
Width = 171
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
MaxLength = 18
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 0
Text = 'seTransferCode'
OnKeyDown = seTransferCodeKeyDown
SplitSymbol = ' | '
end
object memTransferDesc: TMemo
Left = 72
Top = 288
Width = 281
Height = 49
Color = clWhite
Ctl3D = False
Lines.Strings = (
'memTransferDesc')
ParentCtl3D = False
TabOrder = 6
end
object scTransferEmployee: TSDComboBox
Left = 74
Top = 37
Width = 171
Height = 20
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 1
OnClick = scTransferEmployeeClick
KeyItem = cbItem2
end
object scTransferMgr: TSDComboBox
Left = 72
Top = 63
Width = 105
Height = 20
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 2
Text = 'scTransferMgr'
end
object deTransferDate: TDateEdit
Left = 257
Top = 66
Width = 89
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-03-21'
InitDate = '2001-03-21'
ModalResult = 0
TabOrder = 4
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object deTransferEdate: TDateEdit
Left = 257
Top = 98
Width = 89
Height = 18
LineOffset = 2
LineColor = clGreen
LineVisible = False
CDate = '2001-03-21'
InitDate = '2001-03-21'
ModalResult = 0
TabOrder = 5
Color = 50331647
Ctl3D = False
ParentCtl3D = False
end
object scTransferState: TSDComboBox
Left = 72
Top = 95
Width = 105
Height = 20
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 3
Text = 'scTransferState'
KeyItem = cbItem2
end
object GroupBox1: TGroupBox
Left = 15
Top = 121
Width = 351
Height = 121
Caption = '岗位变更'
TabOrder = 7
object Label6: TLabel
Left = 8
Top = 21
Width = 48
Height = 12
Caption = '原部门:'
end
object Label7: TLabel
Left = 8
Top = 53
Width = 48
Height = 12
Caption = '原车间:'
end
object Label8: TLabel
Left = 8
Top = 86
Width = 48
Height = 12
Caption = '原班组:'
end
object Label10: TLabel
Left = 173
Top = 21
Width = 60
Height = 12
Caption = '调入部门:'
end
object Label11: TLabel
Left = 172
Top = 54
Width = 60
Height = 12
Caption = '调入车间:'
end
object Label12: TLabel
Left = 172
Top = 86
Width = 60
Height = 12
Caption = '调入班组:'
end
object scTransferIDept: TSDComboBox
Left = 227
Top = 18
Width = 114
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 0
OnClick = scTransferIDeptClick
KeyItem = cbItem2
end
object scTransferIShop: TSDComboBox
Left = 227
Top = 50
Width = 114
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 1
OnClick = scTransferIShopClick
KeyItem = cbItem2
end
object scTransferITeam: TSDComboBox
Left = 227
Top = 82
Width = 114
Height = 20
Style = csDropDownList
Color = clWhite
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 2
KeyItem = cbItem2
end
object seTransferODept: TSDEdit
Left = 51
Top = 14
Width = 116
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 3
Text = 'seTransferODept'
KeyItem = cbItem2
DispItem = cbItem1
SplitSymbol = ' | '
end
object seTransferOShop: TSDEdit
Left = 51
Top = 48
Width = 116
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = 'seTransferOShop'
KeyItem = cbItem2
DispItem = cbItem1
SplitSymbol = ' | '
end
object seTransferOTeam: TSDEdit
Left = 51
Top = 82
Width = 116
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 5
Text = 'seTransferOTeam'
KeyItem = cbItem2
DispItem = cbItem1
SplitSymbol = ' | '
end
end
end
inherited RecPrintDlg: TPrintDialog
Top = 23
end
inherited PrnSetupDlg: TPrinterSetupDialog
Left = 563
Top = 15
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -