inherited frmTradePlanMulFtyList: TfrmTradePlanMulFtyList Left = 165 Top = 13 Caption = #29983#20135#35745#21010#21333#31649#29702 ClientHeight = 760 ClientWidth = 1587 FormStyle = fsMDIChild Position = poScreenCenter Visible = True ExplicitWidth = 1603 ExplicitHeight = 799 PixelsPerInch = 96 TextHeight = 17 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1587 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 91 Caption = 'ToolBar1' Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradePlan.ImageList_new32 List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 1 OnClick = TBRafreshClick end object TBAdd: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 9 OnClick = TBAddClick end object btnCopy: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #22797#21046 ImageIndex = 13 OnClick = btnCopyClick end object TBEdit: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 3 OnClick = TBEditClick end object TBDel: TToolButton Left = 284 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 5 OnClick = TBDelClick end object ToolButton1: TToolButton Left = 355 Top = 0 AutoSize = True Caption = #25171#21367#35774#32622 ImageIndex = 3 OnClick = ToolButton1Click end object TBPrint: TToolButton Left = 450 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 21 OnClick = TBPrintClick end object TBCK: TToolButton Left = 521 Top = 0 AutoSize = True Caption = #26597#30475 ImageIndex = 8 OnClick = TBCKClick end object ToolButton4: TToolButton Left = 592 Top = 0 AutoSize = True Caption = #38468#20214 ImageIndex = 22 OnClick = ToolButton4Click end object TBTJ: TToolButton Left = 663 Top = 0 AutoSize = True Caption = #25552#20132 ImageIndex = 12 OnClick = TBTJClick end object TBTJCX: TToolButton Left = 734 Top = 0 AutoSize = True Caption = #25552#20132#25764#38144 ImageIndex = 11 OnClick = TBTJCXClick end object Tchk: TToolButton Left = 829 Top = 0 AutoSize = True Caption = #23457#26680 ImageIndex = 12 OnClick = TchkClick end object Tnochk: TToolButton Left = 900 Top = 0 AutoSize = True Caption = #25764#38144#23457#26680 ImageIndex = 11 OnClick = TnochkClick end object TWC: TToolButton Left = 995 Top = 0 AutoSize = True Caption = #23436#25104 ImageIndex = 12 OnClick = TWCClick end object TNowc: TToolButton Left = 1066 Top = 0 AutoSize = True Caption = #25764#38144#23436#25104 ImageIndex = 11 OnClick = TNowcClick end object ToolButton2: TToolButton Left = 1161 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton2Click end object TBClose: TToolButton Left = 1256 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object Panel1: TPanel [1] Left = 0 Top = 38 Width = 1587 Height = 51 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = 16242829 ParentBackground = False TabOrder = 1 object Label3: TLabel Left = 345 Top = 20 Width = 52 Height = 12 Caption = #35745#21010#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 613 Top = 119 Width = 26 Height = 12 Caption = #20811#37325 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 665 Top = 20 Width = 26 Height = 12 Caption = #23458#25143 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 506 Top = 20 Width = 52 Height = 12 Caption = #20135#21697#21517#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 812 Top = 20 Width = 39 Height = 12 Caption = #21512#21516#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object BegDate: TDateTimePicker Left = 128 Top = 16 Width = 85 Height = 20 Date = 40675.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464742650459811600 TabOrder = 0 end object EndDate: TDateTimePicker Left = 219 Top = 16 Width = 86 Height = 20 Date = 40675.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464761099538009100 TabOrder = 2 end object OrderNo: TEdit Tag = 2 Left = 403 Top = 16 Width = 77 Height = 25 TabOrder = 1 OnKeyPress = OrderNoKeyPress end object MPRTKZ: TEdit Tag = 2 Left = 654 Top = 99 Width = 56 Height = 25 TabOrder = 3 OnChange = OrderNoMChange end object ComboBox1: TComboBox Left = 49 Top = 16 Width = 71 Height = 25 TabOrder = 4 Text = #21046#21333#26085#26399 OnChange = ComboBox1Change Items.Strings = ( #21046#21333#26085#26399 #20132#36135#26085#26399) end object CustName: TEdit Tag = 2 Left = 697 Top = 16 Width = 80 Height = 25 TabOrder = 5 OnKeyPress = OrderNoKeyPress end object C_Name: TEdit Tag = 2 Left = 561 Top = 16 Width = 77 Height = 25 TabOrder = 6 OnKeyPress = OrderNoKeyPress end object ConNo: TEdit Tag = 2 Left = 857 Top = 16 Width = 80 Height = 25 TabOrder = 7 OnKeyPress = OrderNoKeyPress end object CheckBox1: TCheckBox Left = 28 Top = 18 Width = 19 Height = 17 Checked = True State = cbChecked TabOrder = 8 end end object cxGrid1: TcxGrid [2] Left = 0 Top = 107 Width = 1176 Height = 449 Align = alClient PopupMenu = PM_1 TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnCellDblClick = Tv1CellDblClick OnFocusedRecordChanged = Tv1FocusedRecordChanged DataController.DataSource = DataSource1 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = Tv1Column11 end item Kind = skSum Column = Tv1Column10 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.IndicatorWidth = 30 Styles.Content = DataLink_TradePlan.Default Styles.IncSearch = DataLink_TradePlan.SHuangSe Styles.Footer = DataLink_TradePlan.Default Styles.Header = DataLink_TradePlan.Default Styles.Inactive = DataLink_TradePlan.SHuangSe Styles.Selection = DataLink_TradePlan.SHuangSe object v1Column16: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True HeaderAlignmentHorz = taCenter Width = 38 end object v1OrdDate: TcxGridDBColumn Caption = #21046#21333#26085#26399 DataBinding.FieldName = 'OrdDate' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.Default Width = 80 end object Tv1Column2: TcxGridDBColumn Caption = #32463#33829#21333#20301 DataBinding.FieldName = 'OurCoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.FontBlue Width = 151 end object Tv1Column4: TcxGridDBColumn Caption = #23458#25143 DataBinding.FieldName = 'CustName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.FoneClMaroon Width = 88 end object v1OrderNo: TcxGridDBColumn Caption = #35745#21010#21333#21495 DataBinding.FieldName = 'OrderNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.Default Width = 80 end object v1DeliveryDate: TcxGridDBColumn Caption = #20132#36135#26085#26399 DataBinding.FieldName = 'DlyDate' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False OnCustomDrawCell = v1DeliveryDateCustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.Default Width = 80 end object Tv1Column3: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False end object Tv1Column22: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 89 end object Tv1Column12: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'ConNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 72 end object Tv1Column13: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'C_Width' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 68 end object Tv1Column14: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'C_GramWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False end object Tv1Column15: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'C_Spec' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 72 end object Tv1Column16: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'C_Composition' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False end object Tv1Column11: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'HZPiQty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 54 end object Tv1Column10: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'OrdQty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1Column11: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'OrdUnit' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Editing = False Width = 66 end object Tv1Column6: TcxGridDBColumn Caption = #21046#21333#20154 DataBinding.FieldName = 'FILLER' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 72 end object Tv1Column1: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 99 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object cxSplitter1: TcxSplitter [3] Left = 0 Top = 556 Width = 1587 Height = 8 HotZoneClassName = 'TcxMediaPlayer9Style' AlignSplitter = salBottom end object cxTabControl1: TcxTabControl [4] Left = 0 Top = 89 Width = 1587 Height = 18 Align = alTop TabOrder = 2 Properties.CustomButtons.Buttons = <> Properties.Style = 9 Properties.TabIndex = 0 Properties.Tabs.Strings = ( ' '#24453#25552#20132' ' ' '#24453#23457#26680' ' ' '#24050#23457#26680' ' ' '#24050#23436#25104' ' ' '#20840#37096' ') OnChange = cxTabControl1Change ClientRectRight = 0 ClientRectTop = 0 end object Panel2: TPanel [5] Left = 0 Top = 564 Width = 1587 Height = 196 Align = alBottom BevelOuter = bvNone Caption = 'Panel2' TabOrder = 5 object cxGrid2: TcxGrid Left = 0 Top = 0 Width = 1587 Height = 196 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False PopupMenu = PopupMenu2 TabOrder = 0 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DataSource2 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter Column = v1PRTOrderQty end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1PRTOrderQty end item Kind = skSum end item Kind = skSum end item Kind = skSum Column = VC_PRTPs end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.IncSearch = DataLink_TradePlan.SHuangSe Styles.Footer = DataLink_TradePlan.Default Styles.Header = DataLink_TradePlan.Default Styles.Inactive = DataLink_TradePlan.SHuangSe Styles.Selection = DataLink_TradePlan.SHuangSe object cxGridDBColumn1: TcxGridDBColumn Tag = 99 Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 66 end object v1PRTColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'C_Color' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.handBlack Width = 66 end object cxGridDBColumn4: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'C_ColorNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1Column5: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'C_Pattern' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object VC_PRTPs: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'OrdPiece' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1PRTOrderQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'OrdQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.Default Width = 66 end object v1OrderUnit: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'OrdUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( 'M' 'Y' 'Kg') HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_TradePlan.Default Width = 66 end object cxGridDBColumn7: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'OrdSNote' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object TV2Column1: TcxGridDBColumn Caption = #27454#21495 DataBinding.FieldName = 'C_StyleNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end end object cxGrid3: TcxGrid [6] Left = 1176 Top = 107 Width = 411 Height = 449 Align = alRight TabOrder = 6 object TV3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_3 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsView.GroupByBox = False Styles.IncSearch = DataLink_TradePlan.SHuangSe Styles.Header = DataLink_TradePlan.Default Styles.Inactive = DataLink_TradePlan.SHuangSe Styles.Selection = DataLink_TradePlan.SHuangSe object V2Column2: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'SerialNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end object cxGridDBColumn2: TcxGridDBColumn Caption = #24037#33402 DataBinding.FieldName = 'Technics' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 79 end object V2Column3: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'FtyNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 82 end object V2Column1: TcxGridDBColumn Caption = #21152#24037#21378 DataBinding.FieldName = 'FtyName' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 87 end object TV2Column5: TcxGridDBColumn Caption = #36319#21333#21592 DataBinding.FieldName = 'Follower' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 86 end end object cxGridLevel2: TcxGridLevel GridView = TV3 end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradePlan.ADOLink Left = 257 Top = 152 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradePlan.ADOLink Left = 121 Top = 153 end object cxgrdpmn1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 660 Top = 428 end object ADOQueryCmd: TADOQuery Connection = DataLink_TradePlan.ADOLink Parameters = <> Left = 568 Top = 240 end object ADOQueryMain: TADOQuery Connection = DataLink_TradePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 420 Top = 216 end object ADOQueryTemp: TADOQuery Connection = DataLink_TradePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 320 Top = 224 end object DataSource1: TDataSource DataSet = Order_Main Left = 812 Top = 440 end object Order_Main: TClientDataSet Aggregates = <> Params = <> Left = 724 Top = 432 end object ADOQuerySub: TADOQuery Connection = DataLink_TradePlan.ADOLink Parameters = <> Left = 312 Top = 600 end object DataSource2: TDataSource DataSet = ORDER_SUB Left = 408 Top = 604 end object ADOQueryImage: TADOQuery Connection = DataLink_TradePlan.ADOLink EnableBCD = False Parameters = <> Left = 316 Top = 283 end object DSImage: TDataSource DataSet = ADOQueryImage Left = 416 Top = 288 end object IdFTP1: TIdFTP ConnectTimeout = 0 NATKeepAlive.UseKeepAlive = False NATKeepAlive.IdleTimeMS = 0 NATKeepAlive.IntervalMS = 0 ProxySettings.ProxyType = fpcmNone ProxySettings.Port = 0 ReadTimeout = 0 Left = 92 Top = 258 end object ORDER_SUB: TClientDataSet Aggregates = <> Params = <> Left = 212 Top = 608 end object PopupMenu2: TPopupMenu Left = 532 Top = 636 object N3: TMenuItem Caption = #20840#36873 OnClick = N3Click end object N4: TMenuItem Caption = #20840#24323 OnClick = N4Click end object N2: TMenuItem Caption = #22797#21046 OnClick = N2Click end end object cxgrdpmn2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 660 Top = 636 end object CDS_WXTS: TClientDataSet Aggregates = <> Params = <> Left = 412 Top = 424 end object PM_1: TPopupMenu Left = 988 Top = 356 object N1: TMenuItem Caption = #22797#21046 OnClick = N1Click end end object GPM_3: TcxGridPopupMenu PopupMenus = <> Left = 860 Top = 228 end object DS_3: TDataSource DataSet = CDS_3 Left = 1096 Top = 404 end object CDS_3: TClientDataSet Aggregates = <> Params = <> Left = 1092 Top = 304 end end