inherited frmTradeSampleClothInEdit: TfrmTradeSampleClothInEdit Left = 67 Top = 126 Caption = #26679#24067#20837#24211#30331#35760 ClientHeight = 538 ClientWidth = 1924 Color = clWhite Font.Charset = GB2312_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 Position = poScreenCenter OnClose = FormClose ExplicitLeft = -454 ExplicitWidth = 1940 ExplicitHeight = 577 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1924 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 59 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 = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = TBSaveClick end object TBClose: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object Panel1: TPanel [1] Left = 0 Top = 30 Width = 1924 Height = 67 Align = alTop TabOrder = 1 object Label12: TLabel Left = 271 Top = 23 Width = 64 Height = 21 Caption = #20837#24211#31867#22411 end object Label1: TLabel Left = 25 Top = 23 Width = 64 Height = 21 Caption = #20837#24211#26102#38388 end object Label14: TLabel Left = 524 Top = 23 Width = 64 Height = 21 Caption = #26469#33258#21333#20301 Visible = False end object IOType: TcxComboBox Left = 355 Top = 17 ParentFont = False Properties.Items.Strings = ( #37319#36141#20837#24211 #21152#24037#20837#24211 #29983#20135#36864#22238 #30424#30408#20837#24211 #38144#21806#36864#22238) TabOrder = 0 Width = 149 end object IOTime: TcxDateEdit Left = 109 Top = 17 ParentFont = False Properties.ImmediatePost = True Properties.ShowTime = False TabOrder = 1 Width = 142 end object FromCoName: TcxButtonEdit Tag = 2 Left = 608 Top = 17 ParentColor = True ParentFont = False Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = FromCoNamePropertiesButtonClick Style.ButtonStyle = btsDefault TabOrder = 2 Visible = False OnDblClick = FromCoNameDblClick Width = 200 end end object ToolBar2: TToolBar [2] Tag = 1 Left = 0 Top = 97 Width = 1924 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 = 2 object ToolButton4: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 2 OnClick = TBAddClick end object ToolButton5: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #20135#21697#36873#25321 ImageIndex = 12 Visible = False OnClick = ToolButton3Click end object ToolButton6: TToolButton Left = 150 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 6 OnClick = TBDelClick end object ToolButton7: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton1Click end end object Panel2: TPanel [3] Left = 0 Top = 127 Width = 1924 Height = 411 Align = alClient Caption = 'Panel2' TabOrder = 3 ExplicitTop = 408 ExplicitHeight = 130 object cxGrid2: TcxGrid Tag = 2 Left = 1 Top = 1 Width = 1448 Height = 409 Align = alLeft TabOrder = 0 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DataSource3 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 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 Tv1Column19: TcxGridDBColumn Caption = #26469#33258#21333#20301#32534#21495 DataBinding.FieldName = 'FromCoNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 139 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 Tv1Column8: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = Tv1Column8PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 122 end object v1SPName: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v2Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 101 end object Tv1Column3: TcxGridDBColumn Caption = #29256#26412#32534#21495 DataBinding.FieldName = 'BBNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 90 end object v1SPSpec: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'C_Spec' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 112 end object Tv1Column10: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'C_Composition' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 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 Tv1Column2: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'C_Color' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 68 end object Tv1Column6: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'C_ColorNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 67 end object Tv1Column11: TcxGridDBColumn Caption = #33457#22411 DataBinding.FieldName = 'C_Pattern' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end object Tv1Column9: TcxGridDBColumn Caption = #27454#21495 DataBinding.FieldName = 'C_StyleNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 67 end object Tv1Column7: TcxGridDBColumn Caption = #26579#21378#32568#21495 DataBinding.FieldName = 'FtyPCId' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 81 end object Tv1Column14: TcxGridDBColumn Caption = #21518#21152#24037 DataBinding.FieldName = 'CraftName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 91 end object v1Column1: TcxGridDBColumn Caption = #25209#21495 DataBinding.FieldName = 'BatchNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter VisibleForCustomization = False Width = 92 end object Tv1Column4: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'Piece' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 60 end object v2Column6: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 60 end object v1QtyUnit: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( 'M' #20010) HeaderAlignmentHorz = taCenter Width = 71 end object Tv1Column17: TcxGridDBColumn Caption = #20379#24212#21830#25253#20215 DataBinding.FieldName = 'Price' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 118 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 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 v1Column12: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 66 end end object cxGrid2Level1: TcxGridLevel GridView = Tv1 end end object GroupBox1: TGroupBox Left = 1449 Top = 1 Width = 474 Height = 409 Align = alClient Caption = #26126#32454#30721#21333'('#21452#20987#21024#38500#26126#32454#20449#24687')' TabOrder = 1 ExplicitLeft = 1 ExplicitWidth = 466 ExplicitHeight = 418 object cxGrid1: TcxGrid Left = 2 Top = 97 Width = 470 Height = 310 Align = alClient TabOrder = 0 ExplicitWidth = 638 object Tv2: TcxGridDBTableView OnDblClick = Tv2DblClick Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DSMX DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' end> DataController.Summary.FooterSummaryItems = < item Format = #20849' 0 '#21367 Kind = skCount Column = v2Column3 end item Kind = skSum end item Kind = skSum end item Kind = skSum 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 OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.IncSearch = DataLink_TradeTotalClothStk.Default Styles.Header = DataLink_TradeTotalClothStk.Default Styles.Inactive = DataLink_TradeTotalClothStk.Default Styles.Selection = DataLink_TradeTotalClothStk.Default object Tv2Column1: TcxGridDBColumn Tag = 9 Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 49 end object v2Column5: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'PieceNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 88 end object v2Column3: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'CIID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 131 end object Tv2Column2: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'Meter' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = Tv2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 91 end object Tv2Column4: TcxGridDBColumn Caption = #29366#24577 DataBinding.FieldName = 'CIIOFlag' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object Panel3: TPanel Left = 2 Top = 23 Width = 470 Height = 74 Align = alTop BevelOuter = bvNone Color = clSkyBlue TabOrder = 1 ExplicitWidth = 638 object Label3: TLabel Left = 220 Top = 28 Width = 44 Height = 21 Caption = #31859#25968 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object QtyMX: TEdit Left = 270 Top = 27 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnKeyPress = QtyMXKeyPress end object edtMJXH: TEdit Left = 124 Top = 27 Width = 65 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object chkMJJH: TCheckBox Left = 53 Top = 28 Width = 63 Height = 21 Caption = #21367#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = chkMJJHClick end object Button1: TButton Left = 360 Top = 19 Width = 91 Height = 33 Caption = #26631#31614#25171#21360 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = Button1Click end end end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink Left = 241 Top = 280 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink Left = 201 Top = 297 end inherited ImageList_new32: TImageList Left = 80 Top = 208 end object DataSource3: TDataSource DataSet = CDS_Sub Left = 749 Top = 250 end object CDS_Sub: TClientDataSet Aggregates = <> Params = <> Left = 645 Top = 224 end object ADOQueryCmd: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink Parameters = <> Left = 224 Top = 208 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 368 Top = 192 end object ADOQueryTemp: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 317 Top = 303 end object GPM_1: TcxGridPopupMenu PopupMenus = <> Left = 472 Top = 294 end object CDS_LM: TClientDataSet Aggregates = <> Params = <> Left = 608 Top = 328 end object OpenDialog1: TOpenDialog Left = 522 Top = 338 end object PopupMenu1: TPopupMenu Left = 1352 Top = 336 object N1: TMenuItem Caption = #20840#36873 end object N2: TMenuItem Caption = #20840#24323 end end object ADOMX: TADOQuery Connection = DataLink_TradeTotalClothStk.ADOLink LockType = ltReadOnly Parameters = <> Left = 1408 Top = 336 end object CDS_MX: TClientDataSet Aggregates = <> Params = <> Left = 1462 Top = 343 end object DSMX: TDataSource DataSet = CDS_MX Left = 1510 Top = 335 end end