You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
364 lines
11 KiB
Plaintext
364 lines
11 KiB
Plaintext
11 months ago
|
object frm_SelectLinkMan: Tfrm_SelectLinkMan
|
||
|
|
Left = 436
|
||
|
|
Top = 373
|
||
|
|
Width = 469
|
||
|
|
Height = 214
|
||
|
|
Caption = #35831#36755#20837#24744#22312'ShippingBox'#20013#30340#27880#20876#20449#24687
|
||
|
|
Color = clBtnFace
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = []
|
||
|
|
OldCreateOrder = False
|
||
|
|
Position = poDesktopCenter
|
||
|
|
OnShow = FormShow
|
||
|
|
PixelsPerInch = 96
|
||
|
|
TextHeight = 13
|
||
|
|
object dxDBGrid1: TdxDBGrid
|
||
|
|
Left = 0
|
||
|
|
Top = 81
|
||
|
|
Width = 453
|
||
|
|
Height = 95
|
||
|
|
TabStop = False
|
||
|
|
Bands = <
|
||
|
|
item
|
||
|
|
end>
|
||
|
|
DefaultLayout = True
|
||
|
|
HeaderPanelRowCount = 1
|
||
|
|
KeyField = 'USERNAME'
|
||
|
|
SummaryGroups = <>
|
||
|
|
SummarySeparator = ', '
|
||
|
|
Align = alClient
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -13
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 0
|
||
|
|
OnDblClick = dxDBGrid1DblClick
|
||
|
|
BandFont.Charset = DEFAULT_CHARSET
|
||
|
|
BandFont.Color = clWindowText
|
||
|
|
BandFont.Height = -11
|
||
|
|
BandFont.Name = 'MS Sans Serif'
|
||
|
|
BandFont.Style = []
|
||
|
|
DataSource = ds1
|
||
|
|
Filter.Criteria = {00000000}
|
||
|
|
HeaderFont.Charset = DEFAULT_CHARSET
|
||
|
|
HeaderFont.Color = clWindowText
|
||
|
|
HeaderFont.Height = -11
|
||
|
|
HeaderFont.Name = 'MS Sans Serif'
|
||
|
|
HeaderFont.Style = []
|
||
|
|
PreviewFont.Charset = DEFAULT_CHARSET
|
||
|
|
PreviewFont.Color = clBlue
|
||
|
|
PreviewFont.Height = -11
|
||
|
|
PreviewFont.Name = 'MS Sans Serif'
|
||
|
|
PreviewFont.Style = []
|
||
|
|
object dxDBGrid1Column1: TdxDBGridColumn
|
||
|
|
Caption = #22995#21517
|
||
|
|
HeaderAlignment = taCenter
|
||
|
|
ReadOnly = True
|
||
|
|
BandIndex = 0
|
||
|
|
RowIndex = 0
|
||
|
|
FieldName = 'USERNAME'
|
||
|
|
end
|
||
|
|
object dxDBGrid1Column2: TdxDBGridColumn
|
||
|
|
Caption = #25163#26426
|
||
|
|
HeaderAlignment = taCenter
|
||
|
|
ReadOnly = True
|
||
|
|
BandIndex = 0
|
||
|
|
RowIndex = 0
|
||
|
|
FieldName = 'Mobile'
|
||
|
|
end
|
||
|
|
object dxDBGrid1Column3: TdxDBGridColumn
|
||
|
|
HeaderAlignment = taCenter
|
||
|
|
ReadOnly = True
|
||
|
|
BandIndex = 0
|
||
|
|
RowIndex = 0
|
||
|
|
FieldName = 'Email'
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object bsSkinPanel3: TbsSkinPanel
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 453
|
||
|
|
Height = 81
|
||
|
|
TabOrder = 1
|
||
|
|
SkinData = frm_main.bsSkinData1
|
||
|
|
SkinDataName = 'panel'
|
||
|
|
DefaultFont.Charset = DEFAULT_CHARSET
|
||
|
|
DefaultFont.Color = clWindowText
|
||
|
|
DefaultFont.Height = 14
|
||
|
|
DefaultFont.Name = 'Arial'
|
||
|
|
DefaultFont.Style = []
|
||
|
|
DefaultWidth = 0
|
||
|
|
DefaultHeight = 0
|
||
|
|
UseSkinFont = True
|
||
|
|
AutoEnabledControls = True
|
||
|
|
CheckedMode = False
|
||
|
|
Checked = False
|
||
|
|
DefaultAlignment = taLeftJustify
|
||
|
|
DefaultCaptionHeight = 22
|
||
|
|
BorderStyle = bvNone
|
||
|
|
CaptionMode = False
|
||
|
|
RollUpMode = False
|
||
|
|
RollUpState = False
|
||
|
|
NumGlyphs = 1
|
||
|
|
Spacing = 2
|
||
|
|
Caption = 'bsSkinPanel3'
|
||
|
|
Align = alTop
|
||
|
|
object Label1: TLabel
|
||
|
|
Left = 27
|
||
|
|
Top = 5
|
||
|
|
Width = 130
|
||
|
|
Height = 13
|
||
|
|
Caption = #36755#20837#20934#30830#25163#26426#21495#25110#37038#31665
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -13
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
Transparent = True
|
||
|
|
end
|
||
|
|
object Label2: TLabel
|
||
|
|
Left = 3
|
||
|
|
Top = 28
|
||
|
|
Width = 155
|
||
|
|
Height = 13
|
||
|
|
Caption = 'ShippingBox'#31995#32479#30331#24405#23494#30721
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -13
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
Transparent = True
|
||
|
|
end
|
||
|
|
object Label3: TLabel
|
||
|
|
Left = 16
|
||
|
|
Top = 64
|
||
|
|
Width = 137
|
||
|
|
Height = 13
|
||
|
|
Caption = #24403#21069#29992#25143#30446#21069#21516#27493#20026
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -13
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object edt1: TEdit
|
||
|
|
Left = 160
|
||
|
|
Top = 1
|
||
|
|
Width = 144
|
||
|
|
Height = 21
|
||
|
|
TabOrder = 0
|
||
|
|
OnKeyDown = edt1KeyDown
|
||
|
|
end
|
||
|
|
object edt2: TEdit
|
||
|
|
Left = 160
|
||
|
|
Top = 25
|
||
|
|
Width = 144
|
||
|
|
Height = 21
|
||
|
|
PasswordChar = '*'
|
||
|
|
TabOrder = 1
|
||
|
|
OnKeyDown = edt1KeyDown
|
||
|
|
end
|
||
|
|
object bsSkinButton8: TbsSkinButton
|
||
|
|
Left = 304
|
||
|
|
Top = 19
|
||
|
|
Width = 73
|
||
|
|
Height = 25
|
||
|
|
TabOrder = 2
|
||
|
|
SkinData = frm_main.bsSkinData1
|
||
|
|
SkinDataName = 'resizebutton'
|
||
|
|
DefaultFont.Charset = DEFAULT_CHARSET
|
||
|
|
DefaultFont.Color = clWindowText
|
||
|
|
DefaultFont.Height = 14
|
||
|
|
DefaultFont.Name = 'Arial'
|
||
|
|
DefaultFont.Style = []
|
||
|
|
DefaultWidth = 0
|
||
|
|
DefaultHeight = 0
|
||
|
|
UseSkinFont = True
|
||
|
|
RepeatMode = False
|
||
|
|
RepeatInterval = 100
|
||
|
|
AllowAllUp = False
|
||
|
|
TabStop = True
|
||
|
|
CanFocused = True
|
||
|
|
Down = False
|
||
|
|
GroupIndex = 0
|
||
|
|
Caption = #37325#26032#20851#32852
|
||
|
|
Glyph.Data = {
|
||
|
|
36060000424D3606000000000000360400002800000020000000100000000100
|
||
|
|
08000000000000020000C40E0000C40E0000000100000000000000000000FFFF
|
||
|
|
FF00FF00FF00491F3F00761E0700811E00007F1E01005FFEFF007FFEFF0083FA
|
||
|
|
FB0092FFFF0093FFFF0098FFFF0099FFFF00A0FFFF00B7FFFF00C6FFFF00DCFF
|
||
|
|
FF00F0FFFF00FBFFFF0073FAFE0078FBFE0089FBFE009FFBFE0054F6FF0057F7
|
||
|
|
FE0068F6FF00A3F3FF00A7E9F3003FE3FE00EDFAFC0030C9E900B6F2FF0031B5
|
||
|
|
D30054DEFF0074E0F800DAF8FF00E5FAFF0012CBFE0020CEFE001CAAD30048CF
|
||
|
|
F20030B0DA000791C5000788BC00108BBC000386C1000274A9000479AF00058B
|
||
|
|
C70003689A0005669500086B9A000268A300F8FAFE00A5B6FC00AABAFC00CAD4
|
||
|
|
FE00DCE3FE00EAEEFE00284BFB003557FB003859FB003C5CFB003F5FFB006480
|
||
|
|
FB00758EFC008097FC00CED7FE000C2EFA002B4DFB00011FFA000120FA00092A
|
||
|
|
FA00111FB800FEFEFE0000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000000000000000
|
||
|
|
0000000000000000000000000000000000000000000000000000020202020202
|
||
|
|
0505050505050505020201010101010101010101010101010101020233333333
|
||
|
|
054B4B4B42374B05020201010101010101010101010101010101022F1F262722
|
||
|
|
054B364147404B050202010101010101010101010101010101012F141D262722
|
||
|
|
053946473C4844050202010101010101010101010101010101012F141D262722
|
||
|
|
053E49383B453D060202010101010101010101010101010101012F141D262722
|
||
|
|
053A444B4B4347030202010101010101010101010101010101012F171B202425
|
||
|
|
054B4B4B4B4B3F470202010101010101010101010101010101012F1C282B2C2D
|
||
|
|
050505050505044A4702010101010101010101010101010101012F211D262722
|
||
|
|
232A3532020202024747010101010101010101010101010101012F141D262722
|
||
|
|
232A2E33020202020247010101010101010101010101010101012F141D262722
|
||
|
|
232A2E33020202020202010101010101010101010101010101012F141D262722
|
||
|
|
232A2E33020202020202010101010101010101010101010101012F151A180708
|
||
|
|
16293133020202020202010101010101010101010101010101012F1312100E0C
|
||
|
|
0C0B19330202020202020101010101010101010101010101010102301E110F0D
|
||
|
|
0A0934020202020202020101010101010101010101010101010102022F2F2F2F
|
||
|
|
2F2F020202020202020201010101010101010101010101010101}
|
||
|
|
NumGlyphs = 2
|
||
|
|
Spacing = 1
|
||
|
|
OnClick = bsSkinButton8Click
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ds1: TDataSource
|
||
|
|
DataSet = MT1
|
||
|
|
Left = 52
|
||
|
|
Top = 136
|
||
|
|
end
|
||
|
|
object MT1: TkbmMemTable
|
||
|
|
DesignActivation = True
|
||
|
|
AttachedAutoRefresh = True
|
||
|
|
AttachMaxCount = 1
|
||
|
|
FieldDefs = <>
|
||
|
|
IndexDefs = <>
|
||
|
|
SortOptions = []
|
||
|
|
PersistentBackup = False
|
||
|
|
ProgressFlags = [mtpcLoad, mtpcSave, mtpcCopy]
|
||
|
|
FilterOptions = []
|
||
|
|
Version = '3.05'
|
||
|
|
LanguageID = 0
|
||
|
|
SortID = 0
|
||
|
|
SubLanguageID = 1
|
||
|
|
LocaleID = 1024
|
||
|
|
Left = 80
|
||
|
|
Top = 96
|
||
|
|
object MT1UserID: TStringField
|
||
|
|
FieldName = 'UserID'
|
||
|
|
end
|
||
|
|
object MT1USERNAME: TStringField
|
||
|
|
FieldName = 'USERNAME'
|
||
|
|
end
|
||
|
|
object MT1Mobile: TStringField
|
||
|
|
FieldName = 'Mobile'
|
||
|
|
end
|
||
|
|
object MT1Companyid: TStringField
|
||
|
|
FieldName = 'Companyid'
|
||
|
|
end
|
||
|
|
object MT1Email: TStringField
|
||
|
|
FieldName = 'Email'
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object SaveQry: TADOQuery
|
||
|
|
Connection = frm_main.db
|
||
|
|
Parameters = <
|
||
|
|
item
|
||
|
|
Name = 'UserID'
|
||
|
|
Attributes = [paNullable]
|
||
|
|
DataType = ftString
|
||
|
|
NumericScale = 255
|
||
|
|
Precision = 255
|
||
|
|
Size = 50
|
||
|
|
Value = Null
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'Mobile'
|
||
|
|
Attributes = [paNullable]
|
||
|
|
DataType = ftString
|
||
|
|
NumericScale = 255
|
||
|
|
Precision = 255
|
||
|
|
Size = 30
|
||
|
|
Value = Null
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = #22995#21517
|
||
|
|
DataType = ftString
|
||
|
|
NumericScale = 255
|
||
|
|
Precision = 255
|
||
|
|
Size = 10
|
||
|
|
Value = Null
|
||
|
|
end>
|
||
|
|
SQL.Strings = (
|
||
|
|
'update t_sys_employee set '#35746#33329#31995#32479#24207#21015#21495'=:UserID,'#31227#21160#30005#35805'=:Mobile '
|
||
|
|
'where '#22995#21517'=:'#22995#21517)
|
||
|
|
Left = 160
|
||
|
|
Top = 112
|
||
|
|
end
|
||
|
|
object GetQry: TADOQuery
|
||
|
|
Connection = frm_main.db
|
||
|
|
Parameters = <
|
||
|
|
item
|
||
|
|
Name = #22995#21517
|
||
|
|
DataType = ftString
|
||
|
|
NumericScale = 255
|
||
|
|
Precision = 255
|
||
|
|
Size = 10
|
||
|
|
Value = Null
|
||
|
|
end>
|
||
|
|
SQL.Strings = (
|
||
|
|
'select * from t_sys_employee where '#22995#21517'=:'#22995#21517)
|
||
|
|
Left = 264
|
||
|
|
Top = 64
|
||
|
|
end
|
||
|
|
object SaveQry2: TADOQuery
|
||
|
|
Connection = frm_main.db
|
||
|
|
Parameters = <
|
||
|
|
item
|
||
|
|
Name = 'UserID'
|
||
|
|
Attributes = [paNullable]
|
||
|
|
DataType = ftString
|
||
|
|
NumericScale = 255
|
||
|
|
Precision = 255
|
||
|
|
Size = 50
|
||
|
|
Value = Null
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = #22995#21517
|
||
|
|
DataType = ftString
|
||
|
|
NumericScale = 255
|
||
|
|
Precision = 255
|
||
|
|
Size = 10
|
||
|
|
Value = Null
|
||
|
|
end>
|
||
|
|
SQL.Strings = (
|
||
|
|
'update t_sys_employee set '#35746#33329#31995#32479#24207#21015#21495'=:UserID where '#22995#21517'=:'#22995#21517)
|
||
|
|
Left = 232
|
||
|
|
Top = 128
|
||
|
|
end
|
||
|
|
end
|