📄 addworkrecordunit.dfm
字号:
object AddWorkRecord: TAddWorkRecord
Left = 280
Top = 250
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #28155#21152#21592#24037#35760#24405
ClientHeight = 277
ClientWidth = 537
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object DataShowPanel: TPanel
Left = 0
Top = 0
Width = 537
Height = 241
Align = alTop
BevelInner = bvLowered
Color = clCaptionText
TabOrder = 0
object PageC: TPageControl
Left = 2
Top = 2
Width = 533
Height = 237
ActivePage = TSData1
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = 16554836
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object TSData1: TTabSheet
Caption = #22522#26412#36164#26009
object Label1: TLabel
Left = 11
Top = 18
Width = 60
Height = 13
Caption = #21592#24037#32534#21495#65306
end
object Label2: TLabel
Left = 11
Top = 43
Width = 60
Height = 13
Caption = #21592#24037#22995#21517#65306
end
object Label3: TLabel
Left = 204
Top = 18
Width = 36
Height = 13
Caption = #24615#21035#65306
end
object Label4: TLabel
Left = 204
Top = 43
Width = 36
Height = 13
Caption = #23398#21382#65306
end
object Label5: TLabel
Left = 11
Top = 68
Width = 60
Height = 13
Caption = #20986#29983#24180#26376#65306
end
object Label6: TLabel
Left = 11
Top = 94
Width = 60
Height = 13
Caption = #24037#20316#26102#38388#65306
end
object Label7: TLabel
Left = 204
Top = 68
Width = 36
Height = 13
Caption = #37096#38376#65306
end
object Label8: TLabel
Left = 204
Top = 93
Width = 36
Height = 13
Caption = #32844#20301#65306
end
object Label9: TLabel
Left = 11
Top = 118
Width = 60
Height = 13
Caption = #32852#31995#30005#35805#65306
end
object Label10: TLabel
Left = 204
Top = 118
Width = 36
Height = 13
Caption = #24037#36164#65306
end
object Label11: TLabel
Left = 11
Top = 144
Width = 60
Height = 13
Caption = #36890#20449#22320#22336#65306
end
object Label12: TLabel
Left = 11
Top = 169
Width = 60
Height = 13
Caption = #30331#20837#23494#30721#65306
end
object edtNo: TEdit
Left = 73
Top = 15
Width = 121
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 0
end
object edtName: TEdit
Left = 73
Top = 40
Width = 121
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 1
end
object CBSex: TComboBox
Left = 241
Top = 15
Width = 113
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
ItemHeight = 13
TabOrder = 2
Items.Strings = (
#30007
#22899)
end
object Panel2: TPanel
Left = 368
Top = 8
Width = 148
Height = 193
Align = alCustom
BevelInner = bvLowered
Color = clCaptionText
TabOrder = 3
object Image1: TImage
Left = 2
Top = 2
Width = 144
Height = 166
Align = alTop
Stretch = True
end
object BtSelectPhoto: TSpeedButton
Left = 2
Top = 168
Width = 144
Height = 23
Caption = #36873#21462#29031#29255
Transparent = False
OnClick = BtSelectPhotoClick
end
end
object CBEducation: TComboBox
Left = 241
Top = 40
Width = 113
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
ItemHeight = 13
TabOrder = 4
Items.Strings = (
#23567#23398
#21021#20013
#39640#20013
#20013#19987
#22823#19987
#39640#32844
#26412#31185
#30740#31350#29983
#21338#22763#29983
#38498#22763#29983)
end
object Birthday: TDateTimePicker
Left = 73
Top = 65
Width = 121
Height = 21
BevelInner = bvNone
BevelOuter = bvNone
Date = 38483.000000000000000000
Time = 38483.000000000000000000
TabOrder = 5
end
object WorkTime: TDateTimePicker
Left = 73
Top = 90
Width = 121
Height = 21
Date = 38483.000000000000000000
Time = 38483.000000000000000000
TabOrder = 6
end
object CBDepartment: TComboBox
Left = 241
Top = 65
Width = 113
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
ItemHeight = 13
TabOrder = 7
Items.Strings = (
#20154#20107#37096
#36130#21153#37096
#20379#38144#37096
#30740#21457#37096
#35843#26597#37096
#21518#21220#37096)
end
object CBJob: TComboBox
Left = 241
Top = 90
Width = 113
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
ItemHeight = 13
TabOrder = 8
Items.Strings = (
#26222#36890#21592#24037
#31163#36864#21592#24037
#37096#38376#27491#32463#29702
#37096#38376#21103#32463#29702)
end
object Phone: TEdit
Left = 73
Top = 115
Width = 121
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 9
end
object edtMoney: TEdit
Left = 241
Top = 115
Width = 113
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 10
end
object edtAddress: TEdit
Left = 73
Top = 141
Width = 281
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 11
end
object edtPwd: TEdit
Left = 73
Top = 166
Width = 281
Height = 21
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 12
end
end
object TSData2: TTabSheet
Caption = #20010#20154#22791#27880
ImageIndex = 1
object Label13: TLabel
Left = 211
Top = 6
Width = 73
Height = 16
AutoSize = False
Caption = #20010#20154#22791#27880
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = 16554836
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Memo1: TMemo
Left = 8
Top = 24
Width = 507
Height = 178
BevelInner = bvLowered
BevelKind = bkFlat
BorderStyle = bsNone
TabOrder = 0
end
end
end
end
object Panel1: TPanel
Left = 0
Top = 241
Width = 537
Height = 36
Align = alBottom
BevelInner = bvLowered
Color = clCream
TabOrder = 1
object BTaddData: TSpeedButton
Left = 2
Top = 2
Width = 179
Height = 32
Caption = #28155#21152#35760#24405
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = False
OnClick = BTaddDataClick
end
object BtReSet: TSpeedButton
Left = 181
Top = 2
Width = 170
Height = 32
Caption = #37325#32622#35760#24405
Transparent = False
OnClick = BtReSetClick
end
object BtExit: TSpeedButton
Left = 351
Top = 2
Width = 183
Height = 32
Caption = #36864#20986
Transparent = False
OnClick = BtExitClick
end
end
object OpenPictureDialog1: TOpenPictureDialog
FileName = 'G:\'#25105#30340#25991#26723'\My Pictures\Tender.bmp'
Filter = 'Bitmaps (*.bmp)|*.bmp'
Left = 486
Top = 170
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -