一个用Delphi开发的ERP软件
源代码在线查看： ser520_03.dfm.svn-base
inherited Ser520_03Form: TSer520_03Form
Left = 164
Top = 127
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #27966#24037#35760#24405
ClientHeight = 199
ClientWidth = 571
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 12
object Bevel1: TBevel [0]
Left = 8
Top = 8
Width = 553
Height = 153
Shape = bsFrame
end
object lblCode: TLabel [1]
Tag = 1
Left = 24
Top = 32
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #20219#21153#32534#21495
end
object sbCode: TSpeedButton [2]
Left = 202
Top = 24
Width = 22
Height = 20
Flat = True
Glyph.Data = {
F6060000424DF606000000000000360000002800000018000000180000000100
180000000000C006000000000000000000000000000000000000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000
000000FF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00FFFFFF80808080808000000000000000000000000000000000000000000000
0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
OnClick = sbCodeClick
end
object lblPerson: TLabel [3]
Tag = 1
Left = 24
Top = 96
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #25191#34892#20154#21592
end
object sbPerson: TSpeedButton [4]
Left = 522
Top = 88
Width = 22
Height = 20
Flat = True
Glyph.Data = {
F6060000424DF606000000000000360000002800000018000000180000000100
180000000000C006000000000000000000000000000000000000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000000000
000000FF00FFFF00FFFF00FFFF00FFFF00FF000000000000000000FF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00FFFFFF80808080808000000000000000000000000000000000000000000000
0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
OnClick = sbPersonClick
end
object lblClass: TLabel [5]
Left = 24
Top = 64
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #20219#21153#31867#21035
end
object lblPriority: TLabel [6]
Left = 368
Top = 64
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #20248#20808#32423#21035
end
object lblDays: TLabel [7]
Tag = 1
Left = 24
Top = 128
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #39044#35745#24037#26102
end
object lblFromDate: TLabel [8]
Tag = 1
Left = 208
Top = 128
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #39044#35745#24320#22987
end
object lblToDate: TLabel [9]
Tag = 1
Left = 376
Top = 128
Width = 48
Height = 12
Alignment = taRightJustify
Caption = #39044#35745#23436#25104
end
object edtCode: TEdit [10]
Left = 80
Top = 24
Width = 121
Height = 20
TabOrder = 0
OnExit = edtCodeExit
end
object edtName: TEdit [11]
Left = 232
Top = 24
Width = 313
Height = 20
Color = clBtnFace
Enabled = False
ReadOnly = True
TabOrder = 1
end
object edtPerson: TEdit [12]
Left = 80
Top = 88
Width = 441
Height = 20
TabOrder = 2
OnEnter = edtPersonEnter
OnExit = edtPersonExit
end
object edtClass: TEdit [13]
Left = 80
Top = 56
Width = 281
Height = 20
Color = clBtnFace
Enabled = False
TabOrder = 3
end
object edtPriority: TEdit [14]
Left = 424
Top = 56
Width = 121
Height = 20
Color = clBtnFace
Enabled = False
TabOrder = 4
Text = '50'
end
object edtDays: TEdit [15]
Left = 80
Top = 120
Width = 65
Height = 20
TabOrder = 5
Text = '1'
end
object edtFromDate: TwwDBDateTimePicker [16]
Left = 264
Top = 120
Width = 105
Height = 20
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'MS Sans Serif'
CalendarAttributes.Font.Style = []
Epoch = 1950
ShowButton = True
TabOrder = 6
OnExit = edtFromDateExit
end
object edtToDate: TwwDBDateTimePicker [17]
Left = 432
Top = 120
Width = 113
Height = 20
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'MS Sans Serif'
CalendarAttributes.Font.Style = []
Epoch = 1950
ShowButton = True
TabOrder = 7
end
object cbUnit: TComboBox [18]
Left = 152
Top = 120
Width = 49
Height = 20
Style = csDropDownList
ItemHeight = 12
ItemIndex = 0
TabOrder = 8
Text = #26102
Items.Strings = (
#26102
#22825
#21608
#26376)
end
object bbtnOk: TBitBtn [19]
Left = 392
Top = 168
Width = 75
Height = 25
Caption = #30830#23450'(&O)'
TabOrder = 9
OnClick = bbtnOkClick
end
object bbtnExit: TBitBtn [20]
Left = 472
Top = 168
Width = 75
Height = 25
Caption = #36864#20986'(&X)'
TabOrder = 10
OnClick = bbtnExitClick
end
inherited pmUISet: TPopupMenu
Left = 24
Top = 168
end
object qryHrm150: TADOQuery
Connection = SYSDM.ADOC
Parameters =
SQL.Strings = (
'select H150_001,H150_002,H150_003 from HRM150')
Left = 376
Top = 80
object qryHrm150H150_001: TAutoIncField
FieldName = 'H150_001'
ReadOnly = True
Visible = False
end
object qryHrm150H150_002: TWideStringField
DisplayLabel = #21592#24037#32534#21495
FieldName = 'H150_002'
end
object qryHrm150H150_003: TWideStringField
DisplayLabel = #21592#24037#22995#21517
FieldName = 'H150_003'
end
end
object qryTas510: TADOQuery
CacheSize = 1000
Connection = SYSDM.ADOC
CursorType = ctStatic
Parameters =
SQL.Strings = (
'select T510_001,T510_002,T100_002,T510_005 '
'from TAS510,TAS100 where T510_004=T100_001 order by T510_001')
Left = 136
Top = 16
object qryTas510T510_001: TWideStringField
DisplayLabel = #20219#21153#32534#21495
FieldName = 'T510_001'
Size = 30
end
object qryTas510T510_002: TWideStringField
DisplayLabel = #20219#21153#21517#31216
FieldName = 'T510_002'
Size = 50
end
object qryTas510T100_002: TWideStringField
DisplayLabel = #20219#21153#31867#21035
FieldName = 'T100_002'
Size = 50
end
object qryTas510T510_005: TSmallintField
DisplayLabel = #20248#20808#32423#21035
FieldName = 'T510_005'
end
end
end
