570 lines
14 KiB
Plaintext
570 lines
14 KiB
Plaintext
![]() |
object frmSketchManageListSel: TfrmSketchManageListSel
|
||
|
Left = 163
|
||
|
Top = 151
|
||
|
Width = 1378
|
||
|
Height = 606
|
||
|
Caption = #21360#33457#25551#31295#36873#25321
|
||
|
Color = clBtnFace
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = []
|
||
|
OldCreateOrder = False
|
||
|
Position = poScreenCenter
|
||
|
OnClose = FormClose
|
||
|
OnDestroy = FormDestroy
|
||
|
OnShow = FormShow
|
||
|
PixelsPerInch = 96
|
||
|
TextHeight = 12
|
||
|
object ToolBar1: TToolBar
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
Width = 1370
|
||
|
AutoSize = True
|
||
|
ButtonHeight = 30
|
||
|
ButtonWidth = 59
|
||
|
Caption = 'ToolBar1'
|
||
|
Color = clSkyBlue
|
||
|
Flat = True
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = []
|
||
|
Images = DataLink_DyeingFinishingPlan.ThreeImgList
|
||
|
List = True
|
||
|
ParentColor = False
|
||
|
ParentFont = False
|
||
|
ShowCaptions = True
|
||
|
TabOrder = 0
|
||
|
object TBRafresh: TToolButton
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
AutoSize = True
|
||
|
Caption = #21047#26032
|
||
|
ImageIndex = 0
|
||
|
OnClick = TBRafreshClick
|
||
|
end
|
||
|
object TBOK: TToolButton
|
||
|
Left = 63
|
||
|
Top = 0
|
||
|
AutoSize = True
|
||
|
Caption = #30830#35748
|
||
|
ImageIndex = 10
|
||
|
OnClick = TBOKClick
|
||
|
end
|
||
|
object TBClose: TToolButton
|
||
|
Left = 126
|
||
|
Top = 0
|
||
|
AutoSize = True
|
||
|
Caption = #20851#38381
|
||
|
ImageIndex = 21
|
||
|
OnClick = TBCloseClick
|
||
|
end
|
||
|
end
|
||
|
object Panel1: TPanel
|
||
|
Left = 0
|
||
|
Top = 32
|
||
|
Width = 1370
|
||
|
Height = 69
|
||
|
Align = alTop
|
||
|
BevelInner = bvRaised
|
||
|
BevelOuter = bvLowered
|
||
|
Color = clSkyBlue
|
||
|
TabOrder = 1
|
||
|
object Label2: TLabel
|
||
|
Left = 72
|
||
|
Top = 44
|
||
|
Width = 18
|
||
|
Height = 12
|
||
|
Caption = '---'
|
||
|
end
|
||
|
object Label3: TLabel
|
||
|
Left = 199
|
||
|
Top = 20
|
||
|
Width = 52
|
||
|
Height = 12
|
||
|
Caption = #33457#22411#32534#30721
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object Label7: TLabel
|
||
|
Left = 199
|
||
|
Top = 44
|
||
|
Width = 52
|
||
|
Height = 12
|
||
|
Caption = #30456#20851#35746#21333
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object BegDate: TDateTimePicker
|
||
|
Left = 97
|
||
|
Top = 16
|
||
|
Width = 85
|
||
|
Height = 20
|
||
|
Date = 40675.464742650460000000
|
||
|
Format = 'yyyy-MM-dd'
|
||
|
Time = 40675.464742650460000000
|
||
|
TabOrder = 0
|
||
|
end
|
||
|
object EndDate: TDateTimePicker
|
||
|
Left = 96
|
||
|
Top = 40
|
||
|
Width = 86
|
||
|
Height = 20
|
||
|
Date = 40675.464761099540000000
|
||
|
Format = 'yyyy-MM-dd'
|
||
|
Time = 40675.464761099540000000
|
||
|
TabOrder = 1
|
||
|
end
|
||
|
object M_HXCODE: TEdit
|
||
|
Tag = 2
|
||
|
Left = 253
|
||
|
Top = 16
|
||
|
Width = 81
|
||
|
Height = 20
|
||
|
TabOrder = 2
|
||
|
OnKeyPress = M_HXCODEKeyPress
|
||
|
end
|
||
|
object XGOrderno: TEdit
|
||
|
Tag = 2
|
||
|
Left = 253
|
||
|
Top = 40
|
||
|
Width = 83
|
||
|
Height = 20
|
||
|
TabOrder = 3
|
||
|
OnKeyPress = M_HXCODEKeyPress
|
||
|
end
|
||
|
object CheckBox1: TCheckBox
|
||
|
Left = 16
|
||
|
Top = 17
|
||
|
Width = 74
|
||
|
Height = 17
|
||
|
Caption = #30331#35760#26085#26399
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
TabOrder = 4
|
||
|
end
|
||
|
end
|
||
|
object cxGrid1: TcxGrid
|
||
|
Left = 0
|
||
|
Top = 131
|
||
|
Width = 1370
|
||
|
Height = 444
|
||
|
Align = alClient
|
||
|
PopupMenu = PopupMenu1
|
||
|
TabOrder = 2
|
||
|
object Tv1: TcxGridDBTableView
|
||
|
OnDblClick = Tv1DblClick
|
||
|
Navigator.Buttons.CustomButtons = <>
|
||
|
OnCellClick = Tv1CellClick
|
||
|
DataController.DataSource = DataSource1
|
||
|
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
||
|
DataController.Summary.DefaultGroupSummaryItems = <
|
||
|
item
|
||
|
Kind = skSum
|
||
|
Position = spFooter
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
Position = spFooter
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
Position = spFooter
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
Position = spFooter
|
||
|
end
|
||
|
item
|
||
|
Kind = skSum
|
||
|
Position = spFooter
|
||
|
end>
|
||
|
DataController.Summary.FooterSummaryItems = <>
|
||
|
DataController.Summary.SummaryGroups = <>
|
||
|
OptionsCustomize.ColumnFiltering = False
|
||
|
OptionsView.CellAutoHeight = True
|
||
|
OptionsView.Footer = True
|
||
|
OptionsView.GroupByBox = False
|
||
|
OptionsView.Indicator = True
|
||
|
OptionsView.IndicatorWidth = 36
|
||
|
Styles.Header = DataLink_DyeingFinishingPlan.Default
|
||
|
OnCustomDrawIndicatorCell = Tv1CustomDrawIndicatorCell
|
||
|
object v1Column2: TcxGridDBColumn
|
||
|
Caption = #30456#20851#35746#21333
|
||
|
DataBinding.FieldName = 'XGOrderno'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Width = 114
|
||
|
end
|
||
|
object v1OrderNo: TcxGridDBColumn
|
||
|
Caption = #33457#22411#32534#30721
|
||
|
DataBinding.FieldName = 'M_HXCODE'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Styles.Header = DataLink_DyeingFinishingPlan.Default
|
||
|
Width = 82
|
||
|
end
|
||
|
object v1Column31: TcxGridDBColumn
|
||
|
Caption = #23458#25143#33457#22411
|
||
|
DataBinding.FieldName = 'M_KHHX'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Width = 99
|
||
|
end
|
||
|
object v1Column1: TcxGridDBColumn
|
||
|
Caption = #23458#25143
|
||
|
DataBinding.FieldName = 'M_KHNAME'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Width = 87
|
||
|
end
|
||
|
object v1Column6: TcxGridDBColumn
|
||
|
Caption = #19994#21153#21592
|
||
|
DataBinding.FieldName = 'YWY'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Width = 76
|
||
|
end
|
||
|
object v1Column14: TcxGridDBColumn
|
||
|
Caption = #24213#24067#35268#26684
|
||
|
DataBinding.FieldName = 'M_DBSPEC'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Width = 82
|
||
|
end
|
||
|
object v1Column10: TcxGridDBColumn
|
||
|
Caption = #22791#27880
|
||
|
DataBinding.FieldName = 'M_NOTE'
|
||
|
PropertiesClassName = 'TcxTextEditProperties'
|
||
|
Properties.Alignment.Horz = taCenter
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Options.Editing = False
|
||
|
Width = 81
|
||
|
end
|
||
|
object Tv1Column1: TcxGridDBColumn
|
||
|
Caption = #38145#23450
|
||
|
DataBinding.FieldName = 'ISSD'
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Width = 75
|
||
|
end
|
||
|
object Tv1Column2: TcxGridDBColumn
|
||
|
Caption = #32553#30053#22270
|
||
|
DataBinding.FieldName = 'SLT'
|
||
|
PropertiesClassName = 'TcxImageProperties'
|
||
|
Properties.FitMode = ifmProportionalStretch
|
||
|
Properties.GraphicClassName = 'TJPEGImage'
|
||
|
Properties.GraphicTransparency = gtTransparent
|
||
|
Properties.ImmediatePost = True
|
||
|
HeaderAlignmentHorz = taCenter
|
||
|
Width = 100
|
||
|
end
|
||
|
end
|
||
|
object cxGrid1Level1: TcxGridLevel
|
||
|
GridView = Tv1
|
||
|
end
|
||
|
end
|
||
|
object Panel6: TPanel
|
||
|
Left = 0
|
||
|
Top = 101
|
||
|
Width = 1370
|
||
|
Height = 30
|
||
|
Align = alTop
|
||
|
AutoSize = True
|
||
|
BevelOuter = bvNone
|
||
|
BorderStyle = bsSingle
|
||
|
TabOrder = 3
|
||
|
DesignSize = (
|
||
|
1366
|
||
|
26)
|
||
|
object Label9: TLabel
|
||
|
Left = 231
|
||
|
Top = 8
|
||
|
Width = 78
|
||
|
Height = 12
|
||
|
Hint = '1'
|
||
|
Caption = #27599#39029#35760#24405#26465#25968
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object LBCPAP: TLabel
|
||
|
Left = 654
|
||
|
Top = 5
|
||
|
Width = 85
|
||
|
Height = 19
|
||
|
Alignment = taCenter
|
||
|
Anchors = [akLeft, akTop, akBottom]
|
||
|
AutoSize = False
|
||
|
Caption = #24403#21069#39029'/'#24635#39029#25968
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
Layout = tlCenter
|
||
|
end
|
||
|
object lbl1: TLabel
|
||
|
Left = 415
|
||
|
Top = 8
|
||
|
Width = 65
|
||
|
Height = 12
|
||
|
Hint = '1'
|
||
|
Caption = #35760#24405#26465#25968#65306
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object BTLP: TButton
|
||
|
Left = 556
|
||
|
Top = 3
|
||
|
Width = 78
|
||
|
Height = 22
|
||
|
Caption = #19978#19968#39029
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
TabOrder = 0
|
||
|
OnClick = BTLPClick
|
||
|
end
|
||
|
object BTNP: TButton
|
||
|
Left = 756
|
||
|
Top = 3
|
||
|
Width = 78
|
||
|
Height = 22
|
||
|
Caption = #19979#19968#39029
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
TabOrder = 1
|
||
|
OnClick = BTNPClick
|
||
|
end
|
||
|
object cxTabControl1: TcxTabControl
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
Width = 219
|
||
|
Height = 24
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -19
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
TabOrder = 2
|
||
|
Visible = False
|
||
|
Properties.CustomButtons.Buttons = <>
|
||
|
Properties.Style = 2
|
||
|
Properties.TabIndex = 2
|
||
|
Properties.Tabs.Strings = (
|
||
|
#26410#23457#26680
|
||
|
#24050#23457#26680
|
||
|
#20840#37096)
|
||
|
OnChange = cxTabControl1Change
|
||
|
ClientRectRight = 0
|
||
|
ClientRectTop = 0
|
||
|
end
|
||
|
object TCBNOR: TEdit
|
||
|
Tag = 2
|
||
|
Left = 313
|
||
|
Top = 2
|
||
|
Width = 83
|
||
|
Height = 24
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -16
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = [fsBold]
|
||
|
ParentFont = False
|
||
|
TabOrder = 3
|
||
|
OnKeyPress = TCBNORKeyPress
|
||
|
end
|
||
|
end
|
||
|
object cxGridPopupMenu1: TcxGridPopupMenu
|
||
|
Grid = cxGrid1
|
||
|
PopupMenus = <>
|
||
|
Left = 688
|
||
|
Top = 200
|
||
|
end
|
||
|
object ADOQueryCmd: TADOQuery
|
||
|
Connection = DataLink_DyeingFinishingPlan.ADOLink
|
||
|
Parameters = <>
|
||
|
Left = 600
|
||
|
Top = 184
|
||
|
end
|
||
|
object ADOQueryMain: TADOQuery
|
||
|
Connection = DataLink_DyeingFinishingPlan.ADOLink
|
||
|
LockType = ltReadOnly
|
||
|
Parameters = <>
|
||
|
Left = 552
|
||
|
Top = 184
|
||
|
end
|
||
|
object ADOQueryTemp: TADOQuery
|
||
|
Connection = DataLink_DyeingFinishingPlan.ADOLink
|
||
|
LockType = ltReadOnly
|
||
|
Parameters = <>
|
||
|
Left = 640
|
||
|
Top = 192
|
||
|
end
|
||
|
object DataSource1: TDataSource
|
||
|
DataSet = Order_Main
|
||
|
Left = 840
|
||
|
Top = 232
|
||
|
end
|
||
|
object Order_Main: TClientDataSet
|
||
|
Aggregates = <>
|
||
|
Params = <>
|
||
|
Left = 808
|
||
|
Top = 232
|
||
|
end
|
||
|
object RM1: TRMGridReport
|
||
|
ThreadPrepareReport = True
|
||
|
InitialZoom = pzDefault
|
||
|
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
|
||
|
DefaultCollate = False
|
||
|
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
|
||
|
PreviewOptions.RulerUnit = rmutScreenPixels
|
||
|
PreviewOptions.RulerVisible = False
|
||
|
PreviewOptions.DrawBorder = False
|
||
|
PreviewOptions.BorderPen.Color = clGray
|
||
|
PreviewOptions.BorderPen.Style = psDash
|
||
|
CompressLevel = rmzcFastest
|
||
|
CompressThread = False
|
||
|
LaterBuildEvents = True
|
||
|
OnlyOwnerDataSet = False
|
||
|
Left = 448
|
||
|
Top = 200
|
||
|
ReportData = {}
|
||
|
end
|
||
|
object RMXLSExport1: TRMXLSExport
|
||
|
ShowAfterExport = True
|
||
|
ExportPrecision = 1
|
||
|
PagesOfSheet = 1
|
||
|
ExportImages = True
|
||
|
ExportFrames = True
|
||
|
ExportImageFormat = ifBMP
|
||
|
JPEGQuality = 0
|
||
|
ScaleX = 1.000000000000000000
|
||
|
ScaleY = 1.000000000000000000
|
||
|
CompressFile = False
|
||
|
Left = 488
|
||
|
Top = 200
|
||
|
end
|
||
|
object CDS_PRT: TClientDataSet
|
||
|
Aggregates = <>
|
||
|
Params = <>
|
||
|
Left = 452
|
||
|
Top = 264
|
||
|
end
|
||
|
object RMDBPRT: TRMDBDataSet
|
||
|
Visible = True
|
||
|
DataSet = CDS_PRT
|
||
|
Left = 536
|
||
|
Top = 368
|
||
|
end
|
||
|
object RMDBDataSet1: TRMDBDataSet
|
||
|
Visible = True
|
||
|
DataSet = ClientDataSet1
|
||
|
Left = 496
|
||
|
Top = 400
|
||
|
end
|
||
|
object ClientDataSet1: TClientDataSet
|
||
|
Aggregates = <>
|
||
|
Params = <>
|
||
|
Left = 464
|
||
|
Top = 400
|
||
|
end
|
||
|
object IdFTP1: TIdFTP
|
||
|
MaxLineAction = maException
|
||
|
ReadTimeout = 0
|
||
|
ProxySettings.ProxyType = fpcmNone
|
||
|
ProxySettings.Port = 0
|
||
|
Left = 524
|
||
|
Top = 402
|
||
|
end
|
||
|
object ADOQueryImage: TADOQuery
|
||
|
Connection = DataLink_DyeingFinishingPlan.ADOLink
|
||
|
Parameters = <>
|
||
|
Left = 864
|
||
|
Top = 273
|
||
|
end
|
||
|
object DSImage: TDataSource
|
||
|
DataSet = ADOQueryImage
|
||
|
Left = 828
|
||
|
Top = 289
|
||
|
end
|
||
|
object ClientDataSet2: TClientDataSet
|
||
|
Aggregates = <>
|
||
|
Params = <>
|
||
|
Left = 468
|
||
|
Top = 364
|
||
|
end
|
||
|
object RMDBDataSet2: TRMDBDataSet
|
||
|
Visible = True
|
||
|
DataSet = ClientDataSet2
|
||
|
Left = 508
|
||
|
Top = 368
|
||
|
end
|
||
|
object PopupMenu1: TPopupMenu
|
||
|
Left = 183
|
||
|
Top = 196
|
||
|
object N3: TMenuItem
|
||
|
Caption = #22797#21046
|
||
|
OnClick = N3Click
|
||
|
end
|
||
|
end
|
||
|
end
|