inherited frmTradeGreyClothInEdit: TfrmTradeGreyClothInEdit Left = 67 Top = 126 Caption = #22383#24067#20837#24211#30331#35760 ClientHeight = 796 ClientWidth = 1595 Color = clWhite Font.Charset = GB2312_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 Position = poScreenCenter OnClose = FormClose ExplicitWidth = 1611 ExplicitHeight = 835 PixelsPerInch = 96 TextHeight = 21 object cxGrid1: TcxGrid [0] Tag = 2 Left = 0 Top = 383 Width = 1595 Height = 413 Align = alClient TabOrder = 0 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_1 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skCount end item Kind = skSum end item Kind = skSum Column = v2Column6 end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Selection = DataLink_TradeTotalClothStk.SHuangSe object v1Column6: TcxGridDBColumn Caption = #20837#24211#21333#21495 DataBinding.FieldName = 'BCIOID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 83 end object v1Column2: TcxGridDBColumn Caption = #20837#24211#26102#38388 DataBinding.FieldName = 'IOTime' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False HeaderAlignmentHorz = taCenter Width = 100 end object v1Column4: TcxGridDBColumn Caption = #20837#24211#31867#22411 DataBinding.FieldName = 'IOType' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.DropDownRows = 20 Properties.Items.Strings = ( #37319#36141#20837#24211 #21152#24037#20837#24211 #29983#20135#36864#22238 #30424#30408#20837#24211 #38144#21806#36864#22238 #26399#21021#20837#24211) HeaderAlignmentHorz = taCenter Width = 87 end object v1FactoryName: TcxGridDBColumn Caption = #26469#33258#21333#20301 DataBinding.FieldName = 'FromCoName' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column14PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 93 end object Tv1Column1: TcxGridDBColumn Caption = #23384#25918#21333#20301 DataBinding.FieldName = 'StkCoName' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = Tv1Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 81 end object v1YWY: TcxGridDBColumn Caption = #19994#21153#21592 DataBinding.FieldName = 'Saleser' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 67 end object Tv1Column4: TcxGridDBColumn Caption = #35745#21010#21333#21495 DataBinding.FieldName = 'FromOrdNo' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = Tv1Column4PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 117 end object Tv1Column7: TcxGridDBColumn Caption = #37319#36141#21333#21495 DataBinding.FieldName = 'FromPurNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 82 end object Tv1Column6: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = Tv1Column6PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 81 end object v1SPName: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 101 end object v1SPSpec: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'C_Spec' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column8PropertiesButtonClick HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 112 end object v1SPMF: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'C_Width' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 75 end object v1Column8: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'C_GramWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 73 end object v1Column1: TcxGridDBColumn Caption = #25209#21495 DataBinding.FieldName = 'BatchNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter VisibleForCustomization = False Width = 92 end object v1Column9: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'Piece' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 68 end object v2Column6: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 92 end object v1QtyUnit: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( 'M' 'Y' 'Kg') HeaderAlignmentHorz = taCenter Width = 64 end object v1Column5: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'StkPosition' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1Column5PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 79 end object v1Column7: TcxGridDBColumn Caption = #36710#38388 DataBinding.FieldName = 'Workshop' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #19968#36710#38388 #20108#36710#38388) HeaderAlignmentHorz = taCenter Width = 70 end object v1Column12: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end object Tv1Column3: TcxGridDBColumn Caption = #33394#21035 DataBinding.FieldName = 'C_ColorDepth' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end object Tv1Column5: TcxGridDBColumn Caption = #30721#23610 DataBinding.FieldName = 'Yardstick' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end object Tv1Column2: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'C_Color' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 68 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ToolBar1: TToolBar [1] Tag = 1 Left = 0 Top = 353 Width = 1595 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeTotalClothStk.cxImageList_bar List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 1 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = TBSaveClick end object TBAdd: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 2 OnClick = TBAddClick end object TBDel: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 6 OnClick = TBDelClick end object ToolButton1: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 276 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object cxPageControl1: TcxPageControl [2] Left = 0 Top = 0 Width = 1595 Height = 353 Align = alTop TabOrder = 2 Properties.ActivePage = cxTabSheet1 Properties.CustomButtons.Buttons = <> Properties.Style = 5 LookAndFeel.Kind = lfUltraFlat ClientRectBottom = 353 ClientRectRight = 1595 ClientRectTop = 32 object cxTabSheet1: TcxTabSheet Caption = ' '#37319#36141#21333' ' ImageIndex = 0 object Pnl_F2: TPanel Left = 0 Top = 0 Width = 1595 Height = 35 Align = alTop BevelInner = bvRaised BevelOuter = bvNone Color = clWhite ParentBackground = False TabOrder = 0 object Label3: TLabel Left = 47 Top = 7 Width = 64 Height = 21 Caption = #37319#36141#21333#21495 end object Label1: TLabel Left = 276 Top = 7 Width = 64 Height = 21 Caption = #20135#21697#21517#31216 end object PurNo: TEdit Tag = 2 Left = 116 Top = 3 Width = 120 Height = 29 Hint = 'PurNo' TabOrder = 0 OnKeyPress = PurNoKeyPress end object C_Name: TEdit Tag = 2 Left = 347 Top = 3 Width = 120 Height = 29 Hint = 'MPRTCodeNAME' TabOrder = 1 end end object cxGrid2: TcxGrid Left = 0 Top = 35 Width = 1595 Height = 286 Align = alClient BorderStyle = cxcbsNone TabOrder = 1 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnCellDblClick = TV2CellDblClick DataController.DataSource = DS_2 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 = TV2Column1 end item Kind = skSum Column = TV2Column2 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.Footer = True OptionsView.GroupByBox = False object cxGridDBColumn1: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True HeaderAlignmentHorz = taCenter Width = 63 end object cxGridDBColumn2: TcxGridDBColumn Caption = #37319#36141#21333#21495 DataBinding.FieldName = 'PurNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 105 end object cxGridDBColumn3: TcxGridDBColumn Caption = #23458#25143#21333#21495 DataBinding.FieldName = 'BuyConNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 88 end object cxGridDBColumn4: TcxGridDBColumn Caption = #32463#33829#21333#20301 DataBinding.FieldName = 'SellName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 113 end object cxGridDBColumn5: TcxGridDBColumn Caption = #23458#25143 DataBinding.FieldName = 'BuyName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False end object cxGridDBColumn6: TcxGridDBColumn Caption = #20013#38388#21830 DataBinding.FieldName = 'MiddleName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False end object cxGridDBColumn7: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'C_Spec' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 60 end object cxGridDBColumn8: TcxGridDBColumn Caption = #20132#36135#26085#26399 DataBinding.FieldName = 'DlyDate' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 91 end object VC_SCSCode: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 89 end object cxGridDBColumn9: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 86 end object cxGridDBColumn10: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'C_Composition' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn11: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'C_Color' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn12: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'C_ColorNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 57 end object cxGridDBColumn13: TcxGridDBColumn Caption = #27454#21495 DataBinding.FieldName = 'C_StyleNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object cxGridDBColumn14: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'C_Pattern' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn15: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'C_Width' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn16: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'C_GramWeight' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v1PRTOrderQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'ConQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v1OrderUnit: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'ConUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 58 end object cxGridDBColumn17: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'ConSNote' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object TV2Column1: TcxGridDBColumn Caption = #21040#36135#21305#25968 DataBinding.FieldName = 'DHPS' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 74 end object TV2Column2: TcxGridDBColumn Caption = #21040#36135#25968#37327 DataBinding.FieldName = 'DHQty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 74 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink Left = 244 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink Left = 116 Top = 120 end inherited ImageList_new32: TImageList Left = 103 Top = 197 end object DS_1: TDataSource DataSet = CDS_Sub Left = 372 Top = 445 end object CDS_Sub: TClientDataSet Aggregates = <> Params = <> Left = 304 Top = 444 end object ADOQueryCmd: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink Parameters = <> Left = 314 Top = 198 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 413 Top = 198 end object ADOQueryTemp: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 508 Top = 197 end object GPM_1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 245 Top = 443 end object DS_2: TDataSource DataSet = CDS_2 Left = 508 Top = 280 end object CDS_2: TClientDataSet Aggregates = <> Params = <> Left = 404 Top = 277 end object GPM_2: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 327 Top = 276 end object ADO_2: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 210 Top = 206 end end