252 lines
5.4 KiB
Plaintext
252 lines
5.4 KiB
Plaintext
|
|
object FrmWorkDeptList_DKPZ: TFrmWorkDeptList_DKPZ
|
||
|
|
Left = 189
|
||
|
|
Top = 133
|
||
|
|
Width = 1245
|
||
|
|
Height = 708
|
||
|
|
Caption = #21592#24037#25171#21345#25293#29031
|
||
|
|
Color = clBtnFace
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
OldCreateOrder = False
|
||
|
|
Position = poScreenCenter
|
||
|
|
OnClose = FormClose
|
||
|
|
OnCreate = FormCreate
|
||
|
|
OnDestroy = FormDestroy
|
||
|
|
OnShow = FormShow
|
||
|
|
PixelsPerInch = 96
|
||
|
|
TextHeight = 12
|
||
|
|
object Panel1: TPanel
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 1229
|
||
|
|
Height = 54
|
||
|
|
Align = alTop
|
||
|
|
BevelInner = bvRaised
|
||
|
|
BevelOuter = bvLowered
|
||
|
|
Color = clSkyBlue
|
||
|
|
TabOrder = 0
|
||
|
|
object Button2: TButton
|
||
|
|
Left = 334
|
||
|
|
Top = 7
|
||
|
|
Width = 117
|
||
|
|
Height = 41
|
||
|
|
Caption = #25171#24320#25668#20687#22836
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -20
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 0
|
||
|
|
Visible = False
|
||
|
|
OnClick = Button2Click
|
||
|
|
end
|
||
|
|
object Button3: TButton
|
||
|
|
Left = 554
|
||
|
|
Top = 14
|
||
|
|
Width = 80
|
||
|
|
Height = 28
|
||
|
|
Caption = #25235#22270
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -15
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 1
|
||
|
|
Visible = False
|
||
|
|
OnClick = Button3Click
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ScrollBox1: TScrollBox
|
||
|
|
Left = 0
|
||
|
|
Top = 54
|
||
|
|
Width = 744
|
||
|
|
Height = 615
|
||
|
|
HorzScrollBar.Visible = False
|
||
|
|
VertScrollBar.Visible = False
|
||
|
|
Align = alLeft
|
||
|
|
TabOrder = 1
|
||
|
|
object Image1: TImage
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
Width = 740
|
||
|
|
Height = 611
|
||
|
|
Cursor = crSizeAll
|
||
|
|
Align = alClient
|
||
|
|
AutoSize = True
|
||
|
|
Center = True
|
||
|
|
IncrementalDisplay = True
|
||
|
|
OnMouseDown = Image1MouseDown
|
||
|
|
OnMouseMove = Image1MouseMove
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Panel3: TPanel
|
||
|
|
Left = 744
|
||
|
|
Top = 54
|
||
|
|
Width = 485
|
||
|
|
Height = 615
|
||
|
|
Align = alClient
|
||
|
|
BevelInner = bvRaised
|
||
|
|
BevelOuter = bvLowered
|
||
|
|
TabOrder = 2
|
||
|
|
object Image2: TImage
|
||
|
|
Left = 2
|
||
|
|
Top = 2
|
||
|
|
Width = 481
|
||
|
|
Height = 611
|
||
|
|
Cursor = crSizeAll
|
||
|
|
Align = alClient
|
||
|
|
AutoSize = True
|
||
|
|
Center = True
|
||
|
|
IncrementalDisplay = True
|
||
|
|
OnMouseDown = Image1MouseDown
|
||
|
|
OnMouseMove = Image1MouseMove
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Panel2: TPanel
|
||
|
|
Left = 748
|
||
|
|
Top = 237
|
||
|
|
Width = 341
|
||
|
|
Height = 186
|
||
|
|
BevelInner = bvRaised
|
||
|
|
BevelOuter = bvLowered
|
||
|
|
TabOrder = 3
|
||
|
|
Visible = False
|
||
|
|
object Label2: TLabel
|
||
|
|
Left = 59
|
||
|
|
Top = 37
|
||
|
|
Width = 86
|
||
|
|
Height = 17
|
||
|
|
Caption = #22995' '#21517':'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -17
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label4: TLabel
|
||
|
|
Left = 59
|
||
|
|
Top = 80
|
||
|
|
Width = 82
|
||
|
|
Height = 17
|
||
|
|
Caption = #25171#21345#26102#38388':'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -17
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label5: TLabel
|
||
|
|
Left = 142
|
||
|
|
Top = 37
|
||
|
|
Width = 60
|
||
|
|
Height = 17
|
||
|
|
Caption = 'Label5'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -17
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label6: TLabel
|
||
|
|
Left = 141
|
||
|
|
Top = 80
|
||
|
|
Width = 60
|
||
|
|
Height = 17
|
||
|
|
Caption = 'Label6'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -17
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label7: TLabel
|
||
|
|
Left = 121
|
||
|
|
Top = 128
|
||
|
|
Width = 120
|
||
|
|
Height = 23
|
||
|
|
Caption = #25171#21345#25104#21151#65281
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clRed
|
||
|
|
Font.Height = -23
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Order_Main: TClientDataSet
|
||
|
|
Aggregates = <>
|
||
|
|
Params = <>
|
||
|
|
Left = 249
|
||
|
|
Top = 232
|
||
|
|
end
|
||
|
|
object ADOQueryMain: TADOQuery
|
||
|
|
Connection = DataLink_WTOA.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 345
|
||
|
|
Top = 230
|
||
|
|
end
|
||
|
|
object DataSource1: TDataSource
|
||
|
|
DataSet = Order_Main
|
||
|
|
Left = 298
|
||
|
|
Top = 231
|
||
|
|
end
|
||
|
|
object ADOQueryDel: TADOQuery
|
||
|
|
Connection = DataLink_WTOA.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 381
|
||
|
|
Top = 231
|
||
|
|
end
|
||
|
|
object OpenPictureDialog1: TOpenPictureDialog
|
||
|
|
DefaultExt = 'jpg'
|
||
|
|
Filter = 'JPEG '#22270#24418#25991#20214' (*.jpg)|*.jpg'
|
||
|
|
Left = 842
|
||
|
|
Top = 207
|
||
|
|
end
|
||
|
|
object IdFTP1: TIdFTP
|
||
|
|
MaxLineAction = maException
|
||
|
|
ReadTimeout = 0
|
||
|
|
ProxySettings.ProxyType = fpcmNone
|
||
|
|
ProxySettings.Port = 0
|
||
|
|
Left = 808
|
||
|
|
Top = 206
|
||
|
|
end
|
||
|
|
object adoqueryImage: TADOQuery
|
||
|
|
Connection = DataLink_WTOA.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 772
|
||
|
|
Top = 207
|
||
|
|
end
|
||
|
|
object ADOQuery1: TADOQuery
|
||
|
|
Connection = DataLink_WTOA.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 782
|
||
|
|
Top = 236
|
||
|
|
end
|
||
|
|
object SaveDialog1: TSavePictureDialog
|
||
|
|
Filter = 'JPG'#22270#29255#26684#24335' (*.JPG)|*.JPG'
|
||
|
|
Left = 822
|
||
|
|
Top = 237
|
||
|
|
end
|
||
|
|
object Timer1: TTimer
|
||
|
|
Interval = 2000
|
||
|
|
OnTimer = Timer1Timer
|
||
|
|
Left = 722
|
||
|
|
Top = 201
|
||
|
|
end
|
||
|
|
object ADOQuery2: TADOQuery
|
||
|
|
Connection = DataLink_WTOA.ADOLink
|
||
|
|
Parameters = <>
|
||
|
|
Left = 782
|
||
|
|
Top = 236
|
||
|
|
end
|
||
|
|
end
|