📄 main_yggl_yglrform.dfm
字号:
object main_yggl_yglr: Tmain_yggl_yglr
Left = 282
Top = 298
ActiveControl = DBEdit1
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsDialog
Caption = '员工人事档案录入'
ClientHeight = 285
ClientWidth = 584
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
Icon.Data = {
0000010002002020100000000000E80200002600000010101000000000002801
00000E0300002800000020000000400000000100040000000000800200000000
0000000000000000000000000000000000000000800000800000008080008000
0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000777777777777777777777700000000
0373000000000000037373300000000033333333333333333333330BB0000000
03B3B3B3B3B3B3B3B3B3B0B3B000000B007B3B00000000003B3B03333000000B
B00303BBBBBBBBBBBBB000033000000BB0003033BB000B3B3B0333030000000B
B07003033BBBBBBBBB0333030000000BB07F003030333BBBBB0000000000000B
BB0FFF000707033BBB00000000000000FB0F0FFFF00370703300000000000000
BFB0FFFFFFF0000303300000000000000BF0F0FFFFFFFF007033000000000000
00FF0F00FFFFFFFF0007300000000000000B07F800FFFFFFFF00700000000000
000FF0F0FF00FF000000370000000000000FFF0F0FFFF8FF0F03030000000000
00033330F0F8FFFF8FF0300000000000000737370F0FF08FF8F8030000000000
0000000000F0F00F8000070000000003B3B3B3B3B30008F8F8FF00000000000B
BBBBBBBBBBBB008F8F8F70000000000BFBFBFBFBFBFBF008F000F7000000000F
FFFFFFFFFFFFFFF00878000000000000BBBBBBBBBBBBBBBBB087878000000000
03B3B3B3B3B3B3B3B30777770000000000000000000000000000007770000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000FFFFFFFFDC00000FD8000007E0000007E000
0003E0000003C0000003C0000003C0000007C0000007C000000FC00001FFE000
01FFE00000FFF000007FF800003FFC00003FFC00001FFC00001FFC00001FFC00
001FE000001FC000001FC000001FC000001FC000000FE000000FF0000007F800
0003FFFFFFC1FFFFFFFFFFFFFFFF280000001000000020000000010004000000
0000C00000000000000000000000000000000000000000000000000080000080
00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000
0000000000000033333333333B000B0BB00000BB33000B0003B0BBB333000B0F
0003BBB0000000B0FF030030000000000FFFF00300000000080FFFF000000000
F0FF8FF030000000770F0F88000000333330888F000000BBBBBB0800700000BB
BBBBBB07700000000000000000000000000000000000FFFF041AC003BB008001
3B03800100008003B07080033BBB801FBB03C00F0000E007B07FE0073033E007
BB00800700008007BB0F80030707C001BB00FFFF0000}
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel4: TPanel
Left = 0
Top = 0
Width = 584
Height = 281
Align = alTop
BevelOuter = bvLowered
TabOrder = 0
object Bevel1: TBevel
Left = 5
Top = 234
Width = 444
Height = 42
Shape = bsFrame
end
object Label2: TLabel
Left = 11
Top = 206
Width = 52
Height = 13
Caption = '个人备注'
end
object Label3: TLabel
Left = 11
Top = 78
Width = 52
Height = 13
Caption = '职工编号'
end
object Label4: TLabel
Left = 11
Top = 99
Width = 52
Height = 13
Caption = '职工姓名'
end
object Label5: TLabel
Left = 11
Top = 123
Width = 52
Height = 13
Caption = '出生日期'
end
object Label6: TLabel
Left = 11
Top = 144
Width = 52
Height = 13
Caption = '行政职务'
end
object Label7: TLabel
Left = 11
Top = 165
Width = 52
Height = 13
Caption = '技术职称'
end
object Label8: TLabel
Left = 11
Top = 184
Width = 52
Height = 13
Caption = '所学专业'
end
object Label9: TLabel
Left = 238
Top = 76
Width = 52
Height = 13
Caption = '职工年龄'
end
object Label10: TLabel
Left = 238
Top = 98
Width = 52
Height = 13
Caption = '职工性别'
end
object Label11: TLabel
Left = 238
Top = 118
Width = 52
Height = 13
Caption = '工作部门'
end
object Label12: TLabel
Left = 238
Top = 141
Width = 52
Height = 13
Caption = '毕业院校'
end
object Label13: TLabel
Left = 238
Top = 165
Width = 52
Height = 13
Caption = '最高学历'
end
object DBEdit3: TDBEdit
Left = 294
Top = 71
Width = 155
Height = 23
AutoSize = False
BiDiMode = bdLeftToRight
Color = 16767411
DataField = '职工年龄'
DataSource = DataSource1
ParentBiDiMode = False
TabOrder = 2
OnKeyPress = DBEdit3KeyPress
end
object DBEdit1: TDBEdit
Left = 70
Top = 71
Width = 155
Height = 23
AutoSize = False
Color = 16767411
DataField = '职工编号'
DataSource = DataSource1
TabOrder = 0
OnKeyPress = DBEdit1KeyPress
end
object DBEdit2: TDBEdit
Left = 70
Top = 94
Width = 155
Height = 24
AutoSize = False
Color = 16767411
DataField = '职工姓名'
DataSource = DataSource1
TabOrder = 1
OnKeyPress = DBEdit2KeyPress
end
object DBEdit6: TDBEdit
Left = 70
Top = 118
Width = 155
Height = 22
AutoSize = False
Color = 16767411
DataField = '出生日期'
DataSource = DataSource1
TabOrder = 3
OnKeyPress = DBEdit6KeyPress
end
object DBEdit9: TDBEdit
Left = 294
Top = 136
Width = 155
Height = 22
AutoSize = False
Color = 16767411
DataField = '毕业院校'
DataSource = DataSource1
TabOrder = 4
OnKeyPress = DBEdit9KeyPress
end
object DBEdit10: TDBEdit
Left = 294
Top = 158
Width = 155
Height = 24
AutoSize = False
Color = 16767411
DataField = '最高学历'
DataSource = DataSource1
TabOrder = 5
OnKeyPress = DBEdit10KeyPress
end
object DBEdit11: TDBEdit
Left = 70
Top = 183
Width = 379
Height = 22
AutoSize = False
Color = 16767411
DataField = '所学专业'
DataSource = DataSource1
TabOrder = 6
OnKeyPress = DBEdit11KeyPress
end
object DBMemo1: TDBMemo
Left = 69
Top = 206
Width = 383
Height = 27
Color = 16767411
DataField = '个人简历'
DataSource = DataSource1
ScrollBars = ssVertical
TabOrder = 7
OnKeyPress = DBMemo1KeyPress
end
object DBComboBox1: TDBComboBox
Left = 294
Top = 94
Width = 155
Height = 21
Style = csDropDownList
Color = 16767411
DataField = '职工性别'
DataSource = DataSource1
DropDownCount = 2
ItemHeight = 13
Items.Strings = (
'男'
'女')
TabOrder = 8
OnKeyPress = DBComboBox1KeyPress
end
object DBComboBox2: TDBComboBox
Left = 294
Top = 115
Width = 155
Height = 21
Color = 16767411
DataField = '工作部门'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 9
OnKeyPress = DBComboBox2KeyPress
end
object DBComboBox3: TDBComboBox
Left = 70
Top = 140
Width = 155
Height = 21
Color = 16767411
DataField = '行政职务'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 10
OnKeyPress = DBComboBox3KeyPress
end
object DBComboBox4: TDBComboBox
Left = 70
Top = 161
Width = 155
Height = 21
Color = 16767411
DataField = '技术职称'
DataSource = DataSource1
ItemHeight = 13
TabOrder = 11
OnKeyPress = DBComboBox4KeyPress
end
object Panel1: TPanel
Left = 1
Top = 1
Width = 578
Height = 31
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
object Label1: TLabel
Left = 209
Top = 6
Width = 160
Height = 19
Caption = '员工人事档案录入'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -19
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
end
object DBImage1: TDBImage
Left = 453
Top = 72
Width = 124
Height = 137
Color = 16767411
DataField = '照片'
DataSource = DataSource1
TabOrder = 13
end
object BitBtn3: TBitBtn
Left = 456
Top = 219
Width = 122
Height = 23
Caption = '装入照片'
TabOrder = 14
OnClick = BitBtn3Click
end
object BitBtn4: TBitBtn
Left = 456
Top = 253
Width = 122
Height = 23
Caption = '清除照片'
TabOrder = 15
OnClick = BitBtn4Click
end
object DBNavigator1: TDBNavigator
Left = 15
Top = 239
Width = 423
Height = 33
DataSource = DataSource1
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
Flat = True
Hints.Strings = (
'第一条记录'
'上一条记录'
'下一条记录'
'最后一条记录'
'插入一条记录'
'删除一条记录'
'编辑当前记录'
'保存数据'
'取消操作'
'数据刷新')
ParentShowHint = False
ShowHint = True
TabOrder = 16
end
object Panel2: TPanel
Left = 0
Top = 33
Width = 580
Height = 31
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 17
object SpeedButton1: TSpeedButton
Left = 3
Top = 3
Width = 70
Height = 25
Caption = '查找'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888800000888880000080F000888880F00080F000888880F
0008000000080000000800F000000F00000800F000800F00000800F000800F00
00088000000000000088880F00080F0008888800000800000888888000888000
88888880F08880F0888888800088800088888888888888888888}
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 73
Top = 3
Width = 67
Height = 25
Caption = '刷新'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888000000088888888807777708888888880777770888800000000
077088880BFBFBFB077088880FBFBFBF077088880BFBFBFB000080000FBFBFBF
088880770BFBFBFB088880770FBFBFBF088880770BFBFBFB0888807700000000
0888807777708888888880000000888888888888888888888888}
OnClick = SpeedButton2Click
end
object SpeedButton4: TSpeedButton
Left = 150
Top = 3
Width = 67
Height = 25
Caption = '退出'
Flat = True
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888880888888888888880080088888888880E088808888888000E00000000
888880EE07770888888880EE07770888888880EE07770888088880EE07770880
088880EE07770800000880EE07770880088880EE077708880888800077770888
888880077777088888888000000008888888}
OnClick = SpeedButton4Click
end
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 488
Top = 136
end
object Table1: TTable
OnPostError = Table1PostError
DatabaseName = 'JFXT'
TableName = 'zg.db'
TableType = ttParadox
Left = 488
Top = 89
end
object Table2: TTable
DatabaseName = 'JFXT'
TableType = ttParadox
Left = 520
Top = 113
end
object OpenPictureDialog1: TOpenPictureDialog
Filter = '图片文件|*.bmp'
Title = '请选择照片'
Left = 360
Top = 200
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -