📄 custemp_unit.dfm
字号:
object frmCustEmp: TfrmCustEmp
Left = 244
Top = 139
Width = 595
Height = 473
Caption = #23458#25143#20225#19994#20154#21592#20449#24687
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 587
Height = 137
Align = alTop
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 42
Width = 60
Height = 12
Caption = #20154#21592#32534#21495#65306
end
object Label2: TLabel
Left = 207
Top = 42
Width = 60
Height = 12
Caption = #20154#21592#22995#21517#65306
FocusControl = DBEdit2
end
object Label3: TLabel
Left = 393
Top = 42
Width = 60
Height = 12
Caption = #24615' '#21035#65306
end
object Label4: TLabel
Left = 393
Top = 72
Width = 60
Height = 12
Caption = #32852#31995#30005#35805#65306
FocusControl = DBEdit4
end
object Label5: TLabel
Left = 26
Top = 104
Width = 48
Height = 12
Caption = 'E-Mail'#65306
FocusControl = DBEdit5
end
object Label6: TLabel
Left = 16
Top = 72
Width = 60
Height = 12
Caption = #32844' '#20301#65306
end
object Label7: TLabel
Left = 207
Top = 72
Width = 60
Height = 12
Caption = #37096' '#38376#65306
end
object Label8: TLabel
Left = 207
Top = 104
Width = 60
Height = 12
Caption = #22791' '#27880#65306
FocusControl = DBEdit8
end
object Label9: TLabel
Left = 16
Top = 14
Width = 60
Height = 12
Caption = #23458#25143#32534#21495#65306
end
object DBText1: TDBText
Left = 80
Top = 40
Width = 121
Height = 17
DataField = 'CUSTEMPID'
DataSource = DM.dsrCustEmp
end
object DBComboBox1: TDBComboBox
Left = 453
Top = 38
Width = 121
Height = 20
DataField = 'SEX'
DataSource = DM.dsrCustEmp
ItemHeight = 12
Items.Strings = (
#30007
#22899)
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 266
Top = 38
Width = 120
Height = 20
DataField = 'NAME'
DataSource = DM.dsrCustEmp
TabOrder = 1
end
object DBEdit4: TDBEdit
Left = 453
Top = 68
Width = 120
Height = 20
DataField = 'TELPHONE'
DataSource = DM.dsrCustEmp
TabOrder = 2
end
object DBEdit5: TDBEdit
Left = 79
Top = 100
Width = 121
Height = 20
DataField = 'EMAIL'
DataSource = DM.dsrCustEmp
TabOrder = 3
end
object DBEdit8: TDBEdit
Left = 266
Top = 100
Width = 307
Height = 20
DataField = 'REMARK'
DataSource = DM.dsrCustEmp
TabOrder = 4
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 79
Top = 10
Width = 123
Height = 20
DataField = 'CUSTEMPID'
DataSource = DM.dsrCustEmp
DropDownRows = 10
DropDownWidth = 150
KeyField = 'CUSTOMERTYPE'
ListField = 'CUSTOMERTYPE;TYPEDESCN'
ListSource = DM.dsrCustomer
TabOrder = 5
end
object DBComboBox2: TDBComboBox
Left = 79
Top = 69
Width = 123
Height = 20
DataField = 'CUSTPOST'
DataSource = DM.dsrCustEmp
ItemHeight = 12
Items.Strings = (
#24037#20154
#32463#29702
#32769#26495
#20854#20182)
TabOrder = 6
end
object DBLookupComboBox2: TDBLookupComboBox
Left = 266
Top = 68
Width = 121
Height = 20
DataField = 'CUSTDEPT'
DataSource = DM.dsrCustEmp
DropDownRows = 10
DropDownWidth = 150
KeyField = 'DEPARTMENTID'
ListField = 'DEPARTMENTID;DEPARTMENTDESCN'
ListSource = DM.dsrDepartment
TabOrder = 7
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 137
Width = 587
Height = 268
Align = alClient
TabOrder = 1
object DBGrid1: TDBGrid
Left = 2
Top = 14
Width = 583
Height = 252
Align = alClient
DataSource = DM.dsrCustEmp
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'CUSTEMPID'
Title.Alignment = taCenter
Title.Caption = #23458#25143#32534#21495
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'NAME'
Title.Alignment = taCenter
Title.Caption = #20154#21592#22995#21517
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'SEX'
Title.Alignment = taCenter
Title.Caption = #24615#21035
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'TELPHONE'
Title.Alignment = taCenter
Title.Caption = #32852#31995#30005#35805
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'EMAIL'
Title.Alignment = taCenter
Title.Caption = 'Email'
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'CUSTPOST'
Title.Alignment = taCenter
Title.Caption = #32844#20301
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'CUSTDEPT'
Title.Alignment = taCenter
Title.Caption = #37096#38376
Width = 80
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'REMARK'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 80
Visible = True
end>
end
end
object Panel1: TPanel
Left = 0
Top = 405
Width = 587
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object btnAdd: TBitBtn
Left = 91
Top = 10
Width = 75
Height = 25
Caption = #28155#21152
TabOrder = 0
OnClick = btnAddClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object btnDel: TBitBtn
Left = 172
Top = 10
Width = 75
Height = 25
Caption = #21024#38500
TabOrder = 1
OnClick = btnDelClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object btnSave: TBitBtn
Left = 419
Top = 10
Width = 75
Height = 25
Caption = #20445#23384
TabOrder = 2
OnClick = btnSaveClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
NumGlyphs = 2
end
object btnFind: TBitBtn
Left = 9
Top = 10
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 3
OnClick = btnFindClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33033333333333333F7F3333333333333000333333333333F777333333333333
000333333333333F777333333333333000333333333333F77733333333333300
033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773
3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703
33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773
333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333
333333773FF77333333333370007333333333333777333333333}
NumGlyphs = 2
end
object btnRefresh: TBitBtn
Left = 255
Top = 10
Width = 75
Height = 25
Caption = #21047#26032
TabOrder = 4
OnClick = btnRefreshClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333FFFFFFFFF333333300000000
0333333777777777F33333330888888803333337FFFFFFF7F333333307777777
0333333777777777F33333330FFFFFFF03333337F3F3FFF7F33333330F9F000F
03333337F7377737F33333330FFFFFFF03333337F3333337F33333330FFFFFFF
03333337F3FFFFF7F33333330F40004F03333337F77777F7F33333330F00000F
03333337F7F337F7F33333330F00000F03333337F7FFF7F7F33333330F40004F
03333337F7777737F33333330FFFFFFF03333337FFFFFFF7F333333300000000
0333333777777777333333333333333333333333333333333333}
NumGlyphs = 2
end
object btnCancel: TBitBtn
Left = 337
Top = 10
Width = 75
Height = 25
Caption = #25764#38144
TabOrder = 5
OnClick = btnCancelClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
000037777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF
FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF7777BBF
FFF07F333777777F3FF70FFFFFFFB9BF1CC07F3FFF337F7377770F777FFFB99B
C1C07F7773337F377F370FFFFFFFB9BBC1C07FFFFFFF7F337FF700000077B999
B000777777777F33777733337377B9999B33333F733373F337FF3377377B99BB
9BB33377F337F377377F3737377B9B79B9B737F73337F7F7F37F33733777BB7B
BBB73373333377F37F3737333777BB777B9B3733333377F337F7333333777B77
77BB3333333337333377333333333777337B3333333333333337}
NumGlyphs = 2
end
object BitBtn1: TBitBtn
Left = 502
Top = 10
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 6
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
3333333777333777FF3333993333339993333377FF3333377FF3399993333339
993337777FF3333377F3393999333333993337F777FF333337FF993399933333
399377F3777FF333377F993339993333399377F33777FF33377F993333999333
399377F333777FF3377F993333399933399377F3333777FF377F993333339993
399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
99333773FF3333777733339993333339933333773FFFFFF77333333999999999
3333333777333777333333333999993333333333377777333333}
NumGlyphs = 2
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -