inherited frmYarnPurchasePlanList: TfrmYarnPurchasePlanList Left = 246 Top = 116 Caption = #32433#32447#37319#36141#35745#21010 ClientHeight = 736 ClientWidth = 1525 FormStyle = fsMDIChild Visible = True ExplicitWidth = 1541 ExplicitHeight = 775 PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1525 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 115 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_PurchasePlan.ImageList_new32 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_PurchasePlan.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 TBFind: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 0 OnClick = TBFindClick end object TBAdd: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 9 OnClick = TBAddClick end object TBEdit: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 3 OnClick = TBEditClick end object ToolButton2: TToolButton Left = 284 Top = 0 AutoSize = True Caption = #22797#21046 ImageIndex = 13 OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 355 Top = 0 AutoSize = True Caption = #26597#30475 ImageIndex = 4 OnClick = ToolButton1Click end object ToolButton5: TToolButton Left = 426 Top = 0 AutoSize = True Caption = #38468#20214 ImageIndex = 22 OnClick = ToolButton5Click end object TBPrint: TToolButton Left = 497 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 21 OnClick = TBPrintClick end object btnTijiao: TToolButton Left = 568 Top = 0 AutoSize = True Caption = #25552#20132 ImageIndex = 12 OnClick = btnTijiaoClick end object btnCXTijiao: TToolButton Left = 639 Top = 0 AutoSize = True Caption = #25764#38144#25552#20132 ImageIndex = 11 OnClick = btnCXTijiaoClick end object tchk: TToolButton Left = 734 Top = 0 AutoSize = True Caption = #23457#26680 ImageIndex = 12 OnClick = tchkClick end object Tnochk: TToolButton Left = 805 Top = 0 AutoSize = True Caption = #25764#38144#23457#26680 ImageIndex = 11 OnClick = TnochkClick end object btnWC: TToolButton Left = 900 Top = 0 AutoSize = True Caption = #23436#25104 ImageIndex = 12 OnClick = btnWCClick end object btnWCCX: TToolButton Left = 971 Top = 0 AutoSize = True Caption = #25764#38144#23436#25104 ImageIndex = 11 OnClick = btnWCCXClick end object Tqx: TToolButton Left = 1066 Top = 0 AutoSize = True Caption = #21512#21516#21462#28040 ImageIndex = 14 OnClick = TqxClick end object Tnoqx: TToolButton Left = 1161 Top = 0 AutoSize = True Caption = #25764#38144#21512#21516#21462#28040 ImageIndex = 11 OnClick = TnoqxClick end object ToolButton7: TToolButton Left = 1280 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton7Click end object TBClose: TToolButton Left = 1375 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object cxGrid1: TcxGrid [1] Left = 0 Top = 119 Width = 1525 Height = 345 Align = alClient PopupMenu = pm1 TabOrder = 3 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellDblClick = Tv1CellDblClick OnCustomDrawCell = Tv1CustomDrawCell OnFocusedRecordChanged = Tv1FocusedRecordChanged DataController.DataSource = DS_1 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.IndicatorWidth = 30 Styles.IncSearch = DataLink_PurchasePlan.SHuangSe Styles.Footer = DataLink_PurchasePlan.Default Styles.Header = DataLink_PurchasePlan.Default Styles.Inactive = DataLink_PurchasePlan.SHuangSe Styles.Selection = DataLink_PurchasePlan.SHuangSe object v1Column4: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 53 end object v1OrdDate: TcxGridDBColumn Caption = #19979#21333#26085#26399 DataBinding.FieldName = 'PurDate' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Styles.Header = DataLink_PurchasePlan.Default Width = 86 end object v1DeliveryDate: TcxGridDBColumn Caption = #20132#36135#26085#26399 DataBinding.FieldName = 'DlyDate' PropertiesClassName = 'TcxDateEditProperties' Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Styles.Header = DataLink_PurchasePlan.Default Width = 85 end object v1ConNo: TcxGridDBColumn Caption = #37319#36141#21333#21495 DataBinding.FieldName = 'PurNo' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Styles.Header = DataLink_PurchasePlan.Default Width = 82 end object v1Column1: TcxGridDBColumn Caption = #20379#24212#21830 DataBinding.FieldName = 'SellName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Styles.Header = DataLink_PurchasePlan.FontBlue Width = 94 end object v1CustomerNoName: TcxGridDBColumn Caption = #25105#26041#21333#20301 DataBinding.FieldName = 'BuyName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Styles.Header = DataLink_PurchasePlan.FoneClMaroon Width = 99 end object Tv1Column19: TcxGridDBColumn Caption = #20132#26399#35828#26126 DataBinding.FieldName = 'ShippMent' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 271 end object v1Column9: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Mnote' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv1Column14: TcxGridDBColumn Caption = #20215#26684#26415#35821 DataBinding.FieldName = 'JiaGeSY' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object Tv1Column7: TcxGridDBColumn Caption = #24065#31181 DataBinding.FieldName = 'Currency' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end object v1Column10: TcxGridDBColumn DataBinding.FieldName = 'status' Visible = False Options.Editing = False VisibleForCustomization = False end object v1Column12: TcxGridDBColumn Caption = #38468#20214 DataBinding.FieldName = 'ISSC' PropertiesClassName = 'TcxCheckBoxProperties' Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Options.Editing = False Width = 50 end object v1Column13: TcxGridDBColumn Caption = #21046#21333#20154 DataBinding.FieldName = 'Filler' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 78 end object Tv1Column2: TcxGridDBColumn Caption = #26159#21542#21547#31246 DataBinding.FieldName = 'IsTax' HeaderAlignmentHorz = taCenter Options.Editing = False end object Tv1Column3: TcxGridDBColumn Caption = #36215#36816#28207 DataBinding.FieldName = 'QiYun' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object Tv1Column5: TcxGridDBColumn Tag = 2 Caption = #28322#30701#35013 DataBinding.FieldName = 'QtyNote' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object Panel1: TPanel [2] Left = 0 Top = 38 Width = 1525 Height = 59 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clWhite ParentBackground = False TabOrder = 1 object Label4: TLabel Left = 235 Top = 35 Width = 52 Height = 12 Caption = #25105#26041#21333#20301 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 430 Top = 99 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 Label9: TLabel Left = 235 Top = 11 Width = 52 Height = 12 Caption = #37319#36141#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 = 303 Top = 99 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 Label13: TLabel Left = 303 Top = 123 Width = 26 Height = 12 Caption = #38376#24133 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 94 Top = 35 Width = 6 Height = 12 Caption = '-' end object Label3: TLabel Left = 394 Top = 11 Width = 39 Height = 12 Caption = #20379#24212#21830 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object BegDate: TDateTimePicker Left = 103 Top = 7 Width = 85 Height = 20 Date = 40675.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464742650459811600 TabOrder = 0 end object EndDate: TDateTimePicker Left = 102 Top = 31 Width = 86 Height = 20 Date = 40675.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.464761099538009100 TabOrder = 1 end object BuyName: TEdit Tag = 2 Left = 296 Top = 31 Width = 78 Height = 20 TabOrder = 2 OnKeyPress = PurNoKeyPress end object MPRTCodeName: TEdit Tag = 2 Left = 483 Top = 95 Width = 76 Height = 20 TabOrder = 6 OnChange = BuyNameChange end object PurNo: TEdit Tag = 2 Left = 296 Top = 7 Width = 77 Height = 20 TabOrder = 3 OnKeyPress = PurNoKeyPress end object MPRTKZ: TEdit Tag = 2 Left = 332 Top = 95 Width = 56 Height = 20 TabOrder = 5 OnChange = BuyNameChange end object MPRTMF: TEdit Tag = 2 Left = 332 Top = 119 Width = 56 Height = 20 TabOrder = 7 OnChange = BuyNameChange end object SellName: TEdit Tag = 2 Left = 448 Top = 7 Width = 77 Height = 20 TabOrder = 4 OnKeyPress = PurNoKeyPress end object IsJYTime: TCheckBox Left = 23 Top = 9 Width = 74 Height = 17 Caption = #19979#21333#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 = 8 end end object cxTabControl1: TcxTabControl [3] Left = 0 Top = 97 Width = 1525 Height = 22 Align = alTop TabOrder = 2 Properties.CustomButtons.Buttons = <> Properties.Style = 9 Properties.TabIndex = 0 Properties.Tabs.Strings = ( #26410#25552#20132 #24050#25552#20132 #24050#23457#26680 #24050#23436#25104 #24050#21462#28040 #20840#37096) OnChange = cxTabControl1Change ClientRectBottom = 22 ClientRectRight = 1525 ClientRectTop = 19 end object cxSplitter1: TcxSplitter [4] Left = 0 Top = 464 Width = 1525 Height = 8 HotZoneClassName = 'TcxMediaPlayer9Style' AlignSplitter = salBottom end object cxGrid2: TcxGrid [5] Left = 0 Top = 472 Width = 1525 Height = 264 Align = alBottom BorderStyle = cxcbsNone PopupMenu = pm2 TabOrder = 5 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> 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 Column = v1PRTPrice end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1PRTOrderQty end item Kind = skSum end item Kind = skSum Column = cxGridDBColumn9 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 Styles.Footer = DataLink_PurchasePlan.Default Styles.Header = DataLink_PurchasePlan.Default Styles.Selection = DataLink_PurchasePlan.SHuangSe object v1XHNo: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'SerialNo' HeaderAlignmentHorz = taCenter Options.Editing = False SortIndex = 0 SortOrder = soAscending Styles.Header = DataLink_PurchasePlan.Default Width = 55 end object VC_SCSCode: TcxGridDBColumn Caption = #21697#29260 DataBinding.FieldName = 'Brand' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object cxGridDBColumn2: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'Y_Name' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v1Column5: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'Y_Spec' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 60 end object cxGridDBColumn4: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'Y_Composition' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn5: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'Y_Color' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object TV2Column1: TcxGridDBColumn Caption = 'D'#25968 DataBinding.FieldName = 'Denier' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object v1PRTOrderQty: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_PurchasePlan.Default Width = 70 end object v1OrderUnit: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_PurchasePlan.Default Width = 58 end object v1PRTPrice: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Styles.Header = DataLink_PurchasePlan.handBlack Width = 70 end object cxGridDBColumn9: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Amount' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 84 end object v1Column2: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'SNote' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Left = 105 Top = 160 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Top = 161 end object GPM_1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 664 Top = 288 end object ADOQueryCmd: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Parameters = <> Left = 168 Top = 320 end object ADOQueryMain: TADOQuery Connection = DataLink_PurchasePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 80 Top = 320 end object ADOQueryTemp: TADOQuery Connection = DataLink_PurchasePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 80 Top = 240 end object DS_1: TDataSource DataSet = CDS_1 Left = 744 Top = 288 end object CDS_2: TClientDataSet Aggregates = <> IndexFieldNames = 'SerialNo' Params = <> Left = 456 Top = 536 end object pm2: TPopupMenu Left = 376 Top = 544 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end object N4: TMenuItem Caption = #22797#21046 OnClick = N4Click end end object DS_2: TDataSource DataSet = CDS_2 Left = 504 Top = 544 end object GPM_2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 416 Top = 536 end object CDS_1: TClientDataSet Aggregates = <> Params = <> Left = 704 Top = 288 end object pm1: TPopupMenu Left = 480 Top = 344 object N5: TMenuItem Caption = #20840#36873 OnClick = N5Click end object N6: TMenuItem Caption = #20840#24323 OnClick = N6Click end object N3: TMenuItem Caption = #22797#21046 OnClick = N3Click end end object ADOQueryImage: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Parameters = <> Left = 176 Top = 243 end end