object frmPRICECHANGE: TfrmPRICECHANGE Left = 135 Top = 232 Width = 1381 Height = 605 Caption = #21360#33457#25551#31295#36153#20462#25913 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 = 1365 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 TBExport: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 68 OnClick = TBExportClick 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 = 1365 Height = 128 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label2: TLabel Left = 77 Top = 44 Width = 18 Height = 12 Caption = '---' end object Label3: TLabel Left = 43 Top = 71 Width = 52 Height = 12 Caption = #21046#29256#20844#21496 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 69 Top = 94 Width = 26 Height = 12 Caption = #33457#22411 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 1134 Top = 60 Width = 65 Height = 12 Caption = #27599#33394#25551#31295#36153 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label5: TLabel Left = 1109 Top = 85 Width = 91 Height = 12 Caption = #27599#33394#23567#29255#21051#30424#36153 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label6: TLabel Left = 1122 Top = 106 Width = 91 Height = 12 Caption = #27599#33394#22823#29255#21051#30424#36153 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = 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 = 97 Top = 41 Width = 86 Height = 20 Date = 40675.464761099540000000 Format = 'yyyy-MM-dd' Time = 40675.464761099540000000 TabOrder = 1 end object G_ZBFACTORYNAME: TEdit Tag = 2 Left = 97 Top = 65 Width = 81 Height = 20 TabOrder = 2 Text = #26825#21451' '#25551#31295 OnKeyPress = G_ZBFACTORYNAMEKeyPress end object CheckBox1: TCheckBox Left = 21 Top = 17 Width = 74 Height = 17 Caption = #21046#29256#26085#26399 Checked = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False State = cbChecked TabOrder = 3 end object M_HXCODE: TEdit Tag = 2 Left = 97 Top = 90 Width = 81 Height = 20 TabOrder = 4 OnKeyPress = G_ZBFACTORYNAMEKeyPress end object Edit1: TEdit Tag = 8 Left = 1201 Top = 55 Width = 81 Height = 20 TabOrder = 5 Visible = False end object Edit2: TEdit Tag = 8 Left = 1203 Top = 79 Width = 81 Height = 20 TabOrder = 6 Visible = False end object Edit3: TEdit Tag = 8 Left = 1214 Top = 100 Width = 81 Height = 20 TabOrder = 7 Visible = False end object Button1: TButton Left = 1060 Top = 28 Width = 75 Height = 25 Caption = #20462#25913 TabOrder = 8 Visible = False OnClick = Button1Click end object GroupBox1: TGroupBox Left = 239 Top = 11 Width = 185 Height = 105 Caption = #27599#33394#25551#31295#36153 TabOrder = 9 object Label7: TLabel Left = 20 Top = 35 Width = 26 Height = 12 Caption = #31616#31295 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 7 Top = 64 Width = 39 Height = 12 Caption = #38750#31616#31295 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object F_MSMGFJ: TEdit Tag = 9 Left = 54 Top = 30 Width = 81 Height = 20 TabOrder = 0 Text = '0' end object F_MSMGFFJ: TEdit Tag = 9 Left = 53 Top = 57 Width = 81 Height = 20 TabOrder = 1 Text = '0' end end object GroupBox2: TGroupBox Left = 424 Top = 9 Width = 185 Height = 105 Caption = #27599#33394#23567#29255#21051#30424#36153#29992 TabOrder = 10 object Label9: TLabel Left = 20 Top = 27 Width = 52 Height = 12 Caption = #26032#31295#22278#32593 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 20 Top = 56 Width = 52 Height = 12 Caption = #26032#31295#24179#32593 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 33 Top = 83 Width = 39 Height = 12 Caption = #38750#26032#31295 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object F_XXGYW: TEdit Tag = 9 Left = 79 Top = 21 Width = 81 Height = 20 TabOrder = 0 Text = '0' end object F_XXGPW: TEdit Tag = 9 Left = 79 Top = 49 Width = 81 Height = 20 TabOrder = 1 Text = '0' end object F_XFXG: TEdit Tag = 9 Left = 79 Top = 75 Width = 81 Height = 20 TabOrder = 2 Text = '0' end end object GroupBox3: TGroupBox Left = 609 Top = 8 Width = 185 Height = 105 Caption = #27599#33394#22823#29255#21051#30424#36153#29992 TabOrder = 11 object Label12: TLabel Left = 20 Top = 27 Width = 52 Height = 12 Caption = #26032#31295#22278#32593 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 20 Top = 55 Width = 52 Height = 12 Caption = #26032#31295#24179#32593 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 33 Top = 83 Width = 39 Height = 12 Caption = #38750#26032#31295 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object F_DXGYW: TEdit Tag = 9 Left = 79 Top = 21 Width = 81 Height = 20 TabOrder = 0 Text = '0' end object F_DXGPW: TEdit Tag = 9 Left = 79 Top = 49 Width = 81 Height = 20 TabOrder = 1 Text = '0' end object F_DFXG: TEdit Tag = 9 Left = 79 Top = 75 Width = 81 Height = 20 TabOrder = 2 Text = '0' end end end object cxGrid1: TcxGrid Left = 0 Top = 160 Width = 1365 Height = 406 Align = alClient TabOrder = 2 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> DataController.DataSource = DataSource1 DataController.Filter.AutoDataSetFilter = True DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum Column = TV1Column3 end item Kind = skSum Column = TV1Column4 end item Kind = skSum Column = TV1Column6 end item Kind = skSum Column = TV1Column7 end item Kind = skSum Column = TV1Column8 end item Kind = skSum Column = TV1Column5 end item Kind = skSum Column = TV1Column17 end item Kind = skSum Column = TV1Column21 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.GroupFooters = gfAlwaysVisible Styles.Inactive = DataLink_DyeingFinishingPlan.SHuangSe Styles.IncSearch = DataLink_DyeingFinishingPlan.SHuangSe Styles.Selection = DataLink_DyeingFinishingPlan.SHuangSe Styles.Header = DataLink_DyeingFinishingPlan.Default object tv2Column1: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' HeaderAlignmentHorz = taCenter Width = 68 end object TV1Column11: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'M_HXCODE' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 82 end object TV1Column18: TcxGridDBColumn Caption = #21046#29256#20844#21496 DataBinding.FieldName = 'G_ZBFACTORYNAME' HeaderAlignmentHorz = taCenter Width = 71 end object TV1Column12: TcxGridDBColumn Caption = #21046#29256#20844#21496#32534#30721 DataBinding.FieldName = 'G_ZBFACTORYZBCODE' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 112 end object cxGridDBColumn2: TcxGridDBColumn Tag = 2 Caption = #26159#21542#24050#32463#25551#31295 DataBinding.FieldName = 'ismg' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 122 end object Tv1Column1: TcxGridDBColumn Caption = #31616#31295#25110#32773#38750#31616#31295 DataBinding.FieldName = 'isjg' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 130 end object TV1Column16: TcxGridDBColumn Caption = #24179'/'#22278#32593 DataBinding.FieldName = 'G_PYW' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 68 end object tv2Column2: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'ORDERNO' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 70 end object cxGridDBColumn7: TcxGridDBColumn Tag = 2 Caption = #19994#21153#21592 DataBinding.FieldName = 'YWY' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 77 end object TV1Column28: TcxGridDBColumn Caption = #21046#29256#19979#21333#26085#26399 DataBinding.FieldName = 'G_ZBDATE' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Width = 111 end object cxGridDBColumn9: TcxGridDBColumn Tag = 2 Caption = #21046#21333#26085#26399 DataBinding.FieldName = 'FILLTIME' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 85 end object TV1Column15: TcxGridDBColumn Caption = #39068#33394#22871#25968 DataBinding.FieldName = 'F_YSTS' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 113 end object TV1Column19: TcxGridDBColumn Caption = #22823#29255#21051#30424#25968 DataBinding.FieldName = 'DPKPS' HeaderAlignmentHorz = taCenter Width = 84 end object TV1Column20: TcxGridDBColumn Caption = #23567#29255#21051#30424#25968 DataBinding.FieldName = 'XPKPS' HeaderAlignmentHorz = taCenter Width = 82 end object tv2Column6: TcxGridDBColumn Caption = #27599#33394#25551#31295#36153 DataBinding.FieldName = 'F_MSMGF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 85 end object TV1Column2: TcxGridDBColumn Caption = #25551#31295#36153 DataBinding.FieldName = 'F_MGF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 70 end object TV1Column3: TcxGridDBColumn Caption = #27599#33394#23567#29255#21051#30424#36153 DataBinding.FieldName = 'F_MSXPKPF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 119 end object TV1Column4: TcxGridDBColumn Caption = #23567#29255#21051#30424#36153 DataBinding.FieldName = 'F_XPKPF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 82 end object TV1Column6: TcxGridDBColumn Caption = #27599#33394#22823#29255#21051#30424#36153 DataBinding.FieldName = 'F_MSDPKPF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 109 end object TV1Column7: TcxGridDBColumn Caption = #22823#29255#21051#30424#36153 DataBinding.FieldName = 'F_DPKPF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 92 end object TV1Column8: TcxGridDBColumn Caption = #25171#26679#36153 DataBinding.FieldName = 'F_DYF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 66 end object TV1Column5: TcxGridDBColumn Caption = #21046#32593#36153 DataBinding.FieldName = 'F_DPZWF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 66 end object TV1Column9: TcxGridDBColumn Caption = #25551#31295#20854#20182#36153#29992 DataBinding.FieldName = 'F_MGQTF' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 104 end object TV1Column10: TcxGridDBColumn Caption = #21512#35745'1' PropertiesClassName = 'TcxTextEditProperties' Visible = False HeaderAlignmentHorz = taCenter Width = 70 end object TV1Column13: TcxGridDBColumn Caption = #21512#35745'2' PropertiesClassName = 'TcxTextEditProperties' Visible = False HeaderAlignmentHorz = taCenter Width = 70 end object TV1Column21: TcxGridDBColumn Caption = #25551#31295#21512#35745 DataBinding.FieldName = 'F_MGHJ' HeaderAlignmentHorz = taCenter Width = 70 end object TV1Column17: TcxGridDBColumn Caption = #24635#36153#29992 DataBinding.FieldName = 'F_ZFY' HeaderAlignmentHorz = taCenter Width = 65 end object TV1Column14: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'F_NOTE' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 73 end end object cxGridLevel1: TcxGridLevel GridView = TV1 end end object MovePanel2: TMovePanel Left = 513 Top = 227 Width = 289 Height = 49 BevelInner = bvLowered Caption = #27491#22312#20462#25913#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False 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 = 807 Top = 233 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 = 467 Top = 364 end object RMDBDataSet2: TRMDBDataSet Visible = True DataSet = ClientDataSet2 Left = 508 Top = 368 end end