inherited frmTradePlanFtyInPut: TfrmTradePlanFtyInPut Left = 143 Top = 4 Caption = #29983#20135#35745#21010#21333#24405#20837 ClientHeight = 726 ClientWidth = 1535 Color = clWhite Font.Charset = GB2312_CHARSET Font.Height = -16 Position = poMainFormCenter WindowState = wsMaximized OnClose = FormClose ExplicitWidth = 1551 ExplicitHeight = 765 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1535 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 131 Caption = 'ToolBar1' Color = clWhite EdgeInner = esNone EdgeOuter = esNone Images = DataLink_TradePlan.cxImageList_bar List = True ParentColor = False ShowCaptions = True TabOrder = 0 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton3Click end object ToolButton1: TToolButton Left = 103 Top = 0 AutoSize = True Caption = #24037#33402#26126#32454#35774#32622 ImageIndex = 3 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 238 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object cxGrid1: TcxGrid [1] Left = 0 Top = 161 Width = 245 Height = 565 Align = alLeft PopupMenu = PM_1 TabOrder = 1 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnCellDblClick = TV1CellDblClick DataController.DataSource = DS_1 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 = < item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnSorting = False OptionsData.Deleting = False OptionsView.GroupByBox = False object cxGridDBColumn1: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'SerialNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False SortIndex = 0 SortOrder = soAscending Width = 83 end object cxGridDBColumn6: TcxGridDBColumn Caption = #24037#33402 DataBinding.FieldName = 'Technics' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = cxGridDBColumn6PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 147 end object TV1Column2: TcxGridDBColumn DataBinding.FieldName = 'SubId' DataBinding.IsNullValueType = True Visible = False end end object cxGridLevel2: TcxGridLevel GridView = TV1 end end object cxGrid2: TcxGrid [2] Left = 245 Top = 161 Width = 1083 Height = 565 Align = alClient PopupMenu = PM_1 TabOrder = 2 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnFocusedRecordChanged = TV2FocusedRecordChanged 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 = VC_PRTPs end item Kind = skSum Column = TV1Column7 end item Kind = skSum Column = TV2Column5 end item Kind = skSum Column = TV2Column4 end item Kind = skSum Column = TV2Column2 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnSorting = False OptionsData.Deleting = False OptionsView.Footer = True OptionsView.GroupByBox = False object v1Column11: TcxGridDBColumn Tag = 99 Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 72 end object TV2Column8: TcxGridDBColumn Caption = #24037#33402 DataBinding.FieldName = 'Technics' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 90 end object TV2Column1: TcxGridDBColumn Caption = #21152#24037#21378'1' DataBinding.FieldName = 'FtyName1' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 88 end object TV2Column2: TcxGridDBColumn Caption = #20998#37197#25968#37327'1' DataBinding.FieldName = 'FtyQty1' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 108 end object TV2Column3: TcxGridDBColumn Caption = #21152#24037#21378'2' DataBinding.FieldName = 'FtyName2' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 89 end object TV2Column6: TcxGridDBColumn Caption = #36319#21333#21592'1' DataBinding.FieldName = 'Follower1' DataBinding.IsNullValueType = True end object TV2Column4: TcxGridDBColumn Caption = #20998#37197#25968#37327'2' DataBinding.FieldName = 'FtyQty2' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 102 end object TV2Column7: TcxGridDBColumn Caption = #36319#21333#21592'2' DataBinding.FieldName = 'Follower2' DataBinding.IsNullValueType = True end object TV2Column5: TcxGridDBColumn Caption = #24453#20998#37197 DataBinding.FieldName = 'FtyQtydfp' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 136 end object TV1Column8: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'SerialNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False SortIndex = 0 SortOrder = soAscending Width = 82 end object TV1Column6: TcxGridDBColumn Caption = #24037#21378#33394#21495 DataBinding.FieldName = 'C_FtyColorNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 92 end object v1Column4: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'C_ColorNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 80 end object v1PRTColor: TcxGridDBColumn Caption = #20013#25991#39068#33394 DataBinding.FieldName = 'C_Color' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 105 end object v1Column5: TcxGridDBColumn Caption = #33457#22411#32534#21495 DataBinding.FieldName = 'C_Pattern' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 92 end object TV1Column3: TcxGridDBColumn Caption = #27454#21495 DataBinding.FieldName = 'C_StyleNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 61 end object VC_PRTPs: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'OrdPiece' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 87 end object v1PRTOrderQty: TcxGridDBColumn Caption = #35746#37327 DataBinding.FieldName = 'OrdQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 80 end object TV1Column7: TcxGridDBColumn Caption = #25237#22383#25968#37327 DataBinding.FieldName = 'OrdRawQty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 142 end object TV1Column16: TcxGridDBColumn Caption = #32553#25439 DataBinding.FieldName = 'ShrinkageRate' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 76 end object cxGridDBColumn2: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'OrdSNote' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 105 end end object cxGrid1Level1: TcxGridLevel GridView = TV2 end end object Panel1: TPanel [3] Left = 0 Top = 30 Width = 1535 Height = 131 Align = alTop TabOrder = 3 object Label52: TLabel Left = 294 Top = 12 Width = 58 Height = 21 Caption = #21152' '#24037' '#21378 end object Label2: TLabel Left = 816 Top = 12 Width = 64 Height = 21 Caption = #20998#37197#25968#37327 end object Label1: TLabel Left = 22 Top = 12 Width = 64 Height = 21 Caption = #24037#21378#24207#21495 end object Label3: TLabel Left = 560 Top = 12 Width = 48 Height = 21 Caption = #36319#21333#21592 end object Label4: TLabel Left = 22 Top = 60 Width = 64 Height = 21 Caption = #29983#20135#35201#27714 end object FtyName: TcxButtonEdit Tag = 4 Left = 356 Top = 6 Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = FtyNamePropertiesButtonClick Style.ButtonStyle = btsDefault TabOrder = 0 OnDblClick = FtyNameDblClick Width = 200 end object FtyQty: TcxTextEdit Tag = 2 Left = 884 Top = 6 TabOrder = 1 Width = 200 end object cxButton1: TcxButton Left = 808 Top = 59 Width = 145 Height = 54 Caption = #20445#23384#20998#37197 TabOrder = 2 OnClick = cxButton1Click end object SerialFtyNo: TcxComboBox Left = 90 Top = 6 Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( '1' '2') TabOrder = 3 Text = '1' Width = 200 end object Follower: TcxButtonEdit Tag = 4 Left = 612 Top = 6 Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = cxButtonEdit1PropertiesButtonClick Style.ButtonStyle = btsDefault TabOrder = 4 OnDblClick = FtyNameDblClick Width = 200 end object scnote: TMemo Left = 88 Top = 48 Width = 465 Height = 73 TabOrder = 5 end end object Panel2: TPanel [4] Left = 1328 Top = 161 Width = 207 Height = 565 Align = alRight TabOrder = 4 object scnote1: TMemo Left = 1 Top = 42 Width = 205 Height = 183 Align = alTop TabOrder = 0 end object Panel3: TPanel Left = 1 Top = 1 Width = 205 Height = 41 Align = alTop Caption = #29983#20135#35201#27714'1' TabOrder = 1 end object Panel4: TPanel Left = 1 Top = 225 Width = 205 Height = 41 Align = alTop Caption = #29983#20135#35201#27714'2' TabOrder = 2 end object scnote2: TMemo Left = 1 Top = 266 Width = 205 Height = 183 Align = alTop TabOrder = 3 end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradePlan.ADOLink Left = 553 Top = 226 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradePlan.ADOLink Left = 555 Top = 319 end inherited ImageList_new32: TImageList Left = 1027 Top = 490 end inherited cxImageList_bar: TcxImageList FormatVersion = 1 Left = 839 Top = 396 DesignInfo = 25953095 end object ADOTemp: TADOQuery Connection = DataLink_TradePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 781 Top = 218 end object ADOCmd: TADOQuery Connection = DataLink_TradePlan.ADOLink Parameters = <> Left = 662 Top = 231 end object DS_1: TDataSource DataSet = CDS_1 Left = 933 Top = 396 end object CDS_1: TClientDataSet Aggregates = <> IndexFieldNames = 'SerialNo' Params = <> Left = 745 Top = 302 end object GPM_1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 1121 Top = 302 end object ADOQueryLabel: TADOQuery Connection = DataLink_TradePlan.ADOLink Parameters = <> Left = 1046 Top = 218 end object IdFTP1: TIdFTP ConnectTimeout = 0 NATKeepAlive.UseKeepAlive = False NATKeepAlive.IdleTimeMS = 0 NATKeepAlive.IntervalMS = 0 ProxySettings.ProxyType = fpcmNone ProxySettings.Port = 0 ReadTimeout = 0 Left = 933 Top = 490 end object OpenDialog1: TOpenDialog Left = 1121 Top = 490 end object PM_1: TPopupMenu Left = 608 Top = 400 object N5: TMenuItem Caption = #20840#36873 OnClick = N5Click end object N6: TMenuItem Caption = #20840#24323 OnClick = N6Click end end object GPM_2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 745 Top = 396 end object ADO_1: TADOQuery Connection = DataLink_TradePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 839 Top = 208 end object ADO_2: TADOQuery Connection = DataLink_TradePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 933 Top = 208 end object DS_2: TDataSource DataSet = CDS_2 Left = 1027 Top = 396 end object CDS_2: TClientDataSet Aggregates = <> IndexFieldNames = 'SerialNo' Params = <> Left = 839 Top = 302 end end