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

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