D7yrshuangjian/染整计划(DyeingFinishingPlan.dll)/U_OrderInPut.dfm
DESKTOP-E401PHE\Administrator 28bc8fedc3 ~
2025-09-06 16:32:36 +08:00

899 lines
22 KiB
Plaintext

object frmOrderInPut: TfrmOrderInPut
Left = 336
Top = 47
Width = 1117
Height = 743
Caption = #25351#31034#21333#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1101
Height = 29
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
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 TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 29
Width = 1101
Height = 312
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
Color = clBtnFace
Ctl3D = False
ParentColor = False
ParentCtl3D = False
TabOrder = 1
object Label1: TLabel
Left = 31
Top = 15
Width = 65
Height = 12
Caption = #25351#31034#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 225
Top = 40
Width = 66
Height = 12
Caption = #35746' '#21333' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 226
Top = 15
Width = 65
Height = 12
Caption = #21046#21333#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 29
Top = 72
Width = 67
Height = 12
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 29
Top = 126
Width = 65
Height = 12
Caption = #25104#21697#38376#24133#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 224
Top = 126
Width = 65
Height = 12
Caption = #25104#21697#20811#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 31
Top = 102
Width = 65
Height = 12
Caption = #20135#21697#21517#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 224
Top = 102
Width = 67
Height = 12
Caption = #32568' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 31
Top = 200
Width = 65
Height = 12
Caption = #21253#35013#35201#27714#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
Left = 31
Top = 40
Width = 65
Height = 12
Caption = #20132#36135#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 404
Top = 102
Width = 65
Height = 12
Caption = #22383#24067#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 29
Top = 258
Width = 67
Height = 12
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 403
Top = 40
Width = 66
Height = 12
Caption = #19994' '#21153' '#21592#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 404
Top = 15
Width = 65
Height = 12
Caption = #35746#21333#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 29
Top = 154
Width = 67
Height = 12
Caption = #39068' '#33394#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 29
Top = 177
Width = 67
Height = 12
Caption = #21305' '#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 231
Top = 177
Width = 60
Height = 12
Caption = #25968' '#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 225
Top = 154
Width = 65
Height = 12
Caption = #25968#37327#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 409
Top = 154
Width = 60
Height = 12
Caption = #32440' '#31649#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 409
Top = 177
Width = 60
Height = 12
Caption = #31354' '#21152#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 391
Top = 126
Width = 78
Height = 12
Caption = #25209#27425#24635#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 400
Top = 70
Width = 65
Height = 12
Caption = #26579#21378#32568#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object OrderNo: TEdit
Tag = 1
Left = 97
Top = 12
Width = 100
Height = 18
Enabled = False
TabOrder = 0
end
object ConNo: TEdit
Tag = 1
Left = 289
Top = 37
Width = 100
Height = 18
TabOrder = 4
end
object OrdDate: TDateTimePicker
Tag = 1
Left = 289
Top = 11
Width = 100
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
TabOrder = 1
end
object CustomerNoName: TBtnEditC
Tag = 1
Left = 97
Top = 68
Width = 290
Height = 20
Hint = 'CustomerNo'
TabOrder = 5
OnBtnUpClick = CustomerNoNameBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object DLYDate: TDateTimePicker
Tag = 1
Left = 97
Top = 36
Width = 100
Height = 20
BevelInner = bvNone
Date = 40916.670856296290000000
Format = 'yyyy-MM-dd'
Time = 40916.670856296290000000
ShowCheckbox = True
TabOrder = 3
end
object MPRTCode: TBtnEditC
Tag = 1
Left = 466
Top = 98
Width = 100
Height = 20
Hint = 'MPRTCode/'#20135#21697#32534#21495
Enabled = False
TabOrder = 6
OnBtnUpClick = MPRTCodeBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object MPRTBZNote: TMemo
Tag = 1
Left = 97
Top = 198
Width = 633
Height = 50
Hint = 'MPRTBZNote/'#21253#35013#35201#27714
ScrollBars = ssVertical
TabOrder = 12
OnDblClick = MPRTBZNoteDblClick
end
object Note: TMemo
Tag = 1
Left = 97
Top = 254
Width = 633
Height = 50
Hint = 'OrdNote/'#22791#27880
ScrollBars = ssVertical
TabOrder = 13
OnDblClick = MPRTBZNoteDblClick
end
object MPRTMF: TEdit
Tag = 1
Left = 97
Top = 123
Width = 100
Height = 18
TabOrder = 8
end
object MPRTSpec: TEdit
Tag = 1
Left = 288
Top = 99
Width = 100
Height = 18
TabOrder = 7
end
object MPRTKZ: TEdit
Tag = 1
Left = 288
Top = 123
Width = 100
Height = 18
TabOrder = 9
end
object YWY: TBtnEditC
Tag = 1
Left = 466
Top = 36
Width = 100
Height = 20
Hint = 'YWY/'#19994#21153#21592
TabOrder = 11
OnBtnUpClick = OrdDefStr2BtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object orderType: TComboBox
Tag = 1
Left = 466
Top = 10
Width = 100
Height = 22
Style = csOwnerDrawFixed
ItemHeight = 16
ItemIndex = 0
TabOrder = 2
Text = #27491#24120#21333
Items.Strings = (
#27491#24120#21333
#22238#20462#21333)
end
object PRTColor: TEdit
Tag = 2
Left = 97
Top = 151
Width = 100
Height = 18
TabOrder = 10
OnChange = PRTColorChange
end
object MPRTCodeName: TBtnEditC
Tag = 1
Left = 97
Top = 98
Width = 100
Height = 20
Hint = 'MPRTCode/'#20135#21697#32534#21495
TabOrder = 14
OnBtnUpClick = MPRTCodeNameBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick
end
object PRTPs: TEdit
Tag = 2
Left = 97
Top = 174
Width = 100
Height = 18
TabOrder = 15
OnChange = PRTColorChange
end
object PRTOrderQty: TEdit
Tag = 2
Left = 288
Top = 174
Width = 100
Height = 18
TabOrder = 16
OnChange = PRTColorChange
end
object OrderUnit: TEdit
Tag = 2
Left = 287
Top = 151
Width = 100
Height = 18
TabOrder = 17
OnChange = PRTColorChange
end
object PiZhong: TEdit
Tag = 1
Left = 466
Top = 151
Width = 100
Height = 18
TabOrder = 18
OnChange = PRTColorChange
end
object KongJia: TEdit
Tag = 1
Left = 466
Top = 174
Width = 100
Height = 18
TabOrder = 19
OnChange = PRTColorChange
end
object PCZQty: TEdit
Tag = 1
Left = 466
Top = 123
Width = 100
Height = 18
TabOrder = 20
OnChange = PRTColorChange
end
object RCBatchNo: TEdit
Tag = 1
Left = 464
Top = 67
Width = 100
Height = 18
TabOrder = 21
end
end
object cxPageControl1: TcxPageControl
Left = 0
Top = 341
Width = 1101
Height = 363
Align = alClient
TabOrder = 2
Properties.ActivePage = cxTabSheet3
Properties.CustomButtons.Buttons = <>
Properties.Style = 8
ClientRectBottom = 363
ClientRectRight = 1101
ClientRectTop = 23
object cxTabSheet3: TcxTabSheet
Caption = #24037#24207#23450#20041
ImageIndex = 3
object ToolBar3: TToolBar
Left = 0
Top = 0
Width = 1101
AutoSize = True
ButtonHeight = 30
ButtonWidth = 107
Flat = True
Images = DataLink_DyeingFinishingPlan.ThreeImgList
List = True
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #36873#25321#24037#24207#20445#23384
ImageIndex = 12
OnClick = ToolButton1Click
end
object ToolButton6: TToolButton
Left = 111
Top = 0
AutoSize = True
Caption = #25554#20837
ImageIndex = 12
OnClick = ToolButton6Click
end
object ToolButton2: TToolButton
Left = 174
Top = 0
AutoSize = True
Caption = #19978#31227
ImageIndex = 48
OnClick = ToolButton2Click
end
object ToolButton3: TToolButton
Left = 237
Top = 0
AutoSize = True
Caption = #19979#31227
ImageIndex = 50
OnClick = ToolButton3Click
end
object ToolButton4: TToolButton
Left = 300
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 13
OnClick = ToolButton4Click
end
end
object cxGrid2: TcxGrid
Left = 0
Top = 32
Width = 1101
Height = 308
Align = alClient
TabOrder = 1
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DS_Glide
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.ColumnSorting = False
OptionsData.Deleting = False
OptionsView.GroupByBox = False
OptionsView.Indicator = True
object TV2Column1: TcxGridDBColumn
Caption = #24207#27425
DataBinding.FieldName = 'Glideidx'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 73
end
object TV2Column2: TcxGridDBColumn
Caption = #24037#24207#21517#31216
DataBinding.FieldName = 'GlideName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
end
object TV2Column3: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 141
end
end
object cxGridLevel1: TcxGridLevel
GridView = TV2
end
end
end
object cxTabSheet4: TcxTabSheet
Caption = #24050#20998#37197#24211#23384
ImageIndex = 3
object ToolBar2: TToolBar
Left = 0
Top = 0
Width = 1101
Height = 29
AutoSize = True
ButtonHeight = 30
ButtonWidth = 83
Flat = True
Images = DataLink_DyeingFinishingPlan.ThreeImgList
List = True
ShowCaptions = True
TabOrder = 0
Visible = False
object ToolButton7: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #36873#25321#24211#23384
ImageIndex = 12
OnClick = ToolButton7Click
end
object ToolButton8: TToolButton
Left = 87
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 13
OnClick = ToolButton8Click
end
end
object cxGrid1: TcxGrid
Left = 0
Top = 32
Width = 1101
Height = 308
Align = alClient
TabOrder = 1
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DS_PBKC
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = V3Column3
end
item
Kind = skSum
Column = V3Column4
end
item
Kind = skSum
Column = V3Column5
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
OptionsView.Indicator = True
Styles.Inactive = DataLink_DyeingFinishingPlan.SHuangSe
Styles.IncSearch = DataLink_DyeingFinishingPlan.SHuangSe
Styles.Selection = DataLink_DyeingFinishingPlan.SHuangSe
Styles.Header = DataLink_DyeingFinishingPlan.Default
object V3Column1: TcxGridDBColumn
Tag = 2
Caption = #21697#21517
DataBinding.FieldName = 'CodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 71
end
object V1Column1: TcxGridDBColumn
Tag = 2
Caption = #38376#24133
DataBinding.FieldName = 'MF'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 73
end
object V1Column2: TcxGridDBColumn
Tag = 2
Caption = #20811#37325
DataBinding.FieldName = 'KZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object V3Column2: TcxGridDBColumn
Caption = #25209#21495
DataBinding.FieldName = 'KCId'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 67
end
object V3Column3: TcxGridDBColumn
Tag = 2
Caption = #24211#23384#21305#25968
DataBinding.FieldName = 'KCPS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object V3Column4: TcxGridDBColumn
Caption = #20998#37197#21305#25968
DataBinding.FieldName = 'FPPS'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Width = 65
end
object V3Column5: TcxGridDBColumn
Caption = #24050#29992#21305#25968
DataBinding.FieldName = 'YYPS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 68
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV1
end
end
end
end
object ADOTemp: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 784
Top = 220
end
object ADOCmd: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
Parameters = <>
Left = 740
Top = 225
end
object ADOQueryLabel: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
Parameters = <>
Left = 640
Top = 77
end
object RMGridReport1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
ModalPreview = False
ShowProgress = False
DefaultCollate = False
ShowPrintDialog = 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 = 736
Top = 184
ReportData = {}
end
object PopupMenu1: TPopupMenu
Left = 364
Top = 524
object N2: TMenuItem
Caption = #20840#36873
end
object N1: TMenuItem
Caption = #20840#24323
end
end
object CDS_PBCK: TClientDataSet
Aggregates = <>
Params = <>
Left = 537
Top = 521
end
object DS_PBKC: TDataSource
DataSet = CDS_PBCK
Left = 572
Top = 521
end
object ADO_PBCK: TADOQuery
Connection = DataLink_DyeingFinishingPlan.ADOLink
Parameters = <>
Left = 464
Top = 453
end
object CDS_Glide: TClientDataSet
Aggregates = <>
Params = <>
Left = 537
Top = 581
end
object DS_Glide: TDataSource
DataSet = CDS_Glide
Left = 572
Top = 581
end
end