inherited frmClothPurchasePlanPut: TfrmClothPurchasePlanPut Left = 219 Top = 76 Caption = #24067#21305#37319#36141#35745#21010#24405#20837 ClientHeight = 691 ClientWidth = 1506 Color = clWhite Font.Charset = GB2312_CHARSET Font.Height = -12 Font.Name = #23435#20307 OldCreateOrder = True Position = poScreenCenter WindowState = wsMaximized ExplicitWidth = 1522 ExplicitHeight = 730 PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1506 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 91 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_PurchasePlan.ImageList_new32 Images = DataLink_PurchasePlan.ImageList_new32 List = True ParentColor = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 16 OnClick = TBSaveClick end object ToolButton3: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton3Click end object TBClose: TToolButton Left = 166 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object ToolBar2: TToolBar [1] Tag = 1 Left = 0 Top = 217 Width = 1506 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 75 Caption = 'ToolBar1' Color = clBtnFace DisabledImages = DataLink_PurchasePlan.ImageList_new32 EdgeInner = esNone EdgeOuter = esNone 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 = 1 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 2 OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 6 OnClick = ToolButton2Click end end object ScrollBox1: TScrollBox [2] Left = 0 Top = 38 Width = 1506 Height = 179 Align = alTop BevelInner = bvNone BevelOuter = bvNone BorderStyle = bsNone Color = clWhite Ctl3D = False Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentColor = False ParentCtl3D = False ParentFont = False TabOrder = 2 object Label3: TLabel Left = 289 Top = 44 Width = 65 Height = 12 Caption = #19979#21333#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label9: TLabel Left = 770 Top = 17 Width = 66 Height = 12 Caption = #19994' '#21153' '#21592#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 40 Top = 17 Width = 65 Height = 12 Caption = #37319#36141#21333#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 527 Top = 17 Width = 65 Height = 12 Caption = #25105#26041#21333#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clMaroon Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label20: TLabel Left = 289 Top = 17 Width = 66 Height = 12 Caption = #20379' '#24212' '#21830#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 764 Top = 69 Width = 66 Height = 12 Caption = #28322' '#30701' '#35013#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label27: TLabel Left = 40 Top = 98 Width = 65 Height = 12 Caption = #26159#21542#21547#31246#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label29: TLabel Left = 288 Top = 69 Width = 66 Height = 12 Caption = #36215' '#36816' '#28207#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label30: TLabel Left = 528 Top = 69 Width = 66 Height = 12 Caption = #30446' '#30340' '#28207#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 527 Top = 98 Width = 67 Height = 12 Caption = #24065' '#31181#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 40 Top = 44 Width = 65 Height = 12 Caption = #20184#27454#26041#24335#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 40 Top = 69 Width = 65 Height = 12 Caption = #36816#36755#26041#24335#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 289 Top = 98 Width = 65 Height = 12 Caption = #20215#26684#26415#35821#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 40 Top = 143 Width = 65 Height = 12 Caption = #21253#35013#35201#27714#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 771 Top = 44 Width = 65 Height = 12 Caption = #20132#26399#35828#26126#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 529 Top = 44 Width = 65 Height = 12 Caption = #20132#36135#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object lblSalesId: TLabel Left = 1067 Top = 302 Width = 65 Height = 12 Caption = #19994#21153#32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label25: TLabel Left = 1075 Top = 323 Width = 65 Height = 12 Caption = #29702#21333#32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object PurDate: TDateTimePicker Tag = 2 Left = 357 Top = 40 Width = 125 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.670856296288548000 TabOrder = 0 end object PurNo: TEdit Tag = 2 Left = 109 Top = 14 Width = 125 Height = 18 TabOrder = 1 Text = #33258#21160#29983#25104 end object BuyName: TBtnEditC Tag = 2 Left = 597 Top = 13 Width = 125 Height = 20 ReadOnly = True TabOrder = 2 OnBtnUpClick = BuyNameBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object QtyNote: TBtnEditC Tag = 2 Left = 834 Top = 65 Width = 125 Height = 20 Hint = 'QtyNoteZW/'#28322#30701#35013 TabOrder = 3 OnBtnUpClick = SalesmanBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object Sellname: TBtnEditC Tag = 2 Left = 357 Top = 13 Width = 125 Height = 20 Hint = 'SellName/'#20379#24212#21830 TabOrder = 4 OnBtnUpClick = SellNameBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object IsTax: TComboBox Tag = 2 Left = 109 Top = 94 Width = 125 Height = 20 TabOrder = 5 Items.Strings = ( #26159 #21542) end object QiYun: TBtnEditC Tag = 2 Left = 357 Top = 65 Width = 125 Height = 20 Hint = 'QiYun/'#36215#36816#28207 TabOrder = 6 OnBtnUpClick = QiYunBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object MuDi: TBtnEditC Tag = 2 Left = 597 Top = 65 Width = 125 Height = 20 Hint = 'MuDi/'#30446#30340#28207 TabOrder = 7 OnBtnUpClick = QiYunBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object Currency: TComboBox Tag = 2 Left = 597 Top = 94 Width = 125 Height = 20 ItemIndex = 0 TabOrder = 8 Text = 'CNY' Items.Strings = ( 'CNY' 'USD') end object YunShu: TBtnEditC Tag = 2 Left = 109 Top = 65 Width = 125 Height = 20 Hint = 'YunShu/'#36816#36755#26041#24335 TabOrder = 9 OnBtnUpClick = QiYunBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object Payment: TBtnEditC Tag = 2 Left = 109 Top = 40 Width = 125 Height = 20 Hint = 'Payment/'#20184#27454#26041#24335 TabOrder = 10 OnBtnUpClick = QiYunBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object JiaGeSY: TBtnEditC Tag = 2 Left = 357 Top = 94 Width = 125 Height = 20 Hint = 'JiaGeSY/'#20215#26684#26415#35821 TabOrder = 11 OnBtnUpClick = QiYunBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object Packing: TBtnEditC Tag = 2 Left = 109 Top = 139 Width = 600 Height = 20 Hint = 'Packing/'#21253#35013#35201#27714 AutoSize = False TabOrder = 12 OnBtnUpClick = QiYunBtnUpClick OnBtnDnClick = BuyNameBtnDnClick end object DlyDate: TDateTimePicker Tag = 2 Left = 597 Top = 40 Width = 125 Height = 20 BevelInner = bvNone Date = 40916.000000000000000000 Format = 'yyyy-MM-dd' Time = 0.670856296288548000 TabOrder = 13 end object ShippMent: TEdit Tag = 2 Left = 834 Top = 41 Width = 125 Height = 18 TabOrder = 14 OnKeyPress = ShippMentKeyPress end object Saleser: TEdit Tag = 2 Left = 834 Top = 14 Width = 125 Height = 18 TabOrder = 15 end object SalesId: TEdit Tag = 2 Left = 1138 Top = 296 Width = 125 Height = 18 TabOrder = 16 Visible = False end object TallyId: TEdit Tag = 2 Left = 1139 Top = 320 Width = 125 Height = 18 TabOrder = 17 Visible = False end end object cxGrid1: TcxGrid [3] Left = 0 Top = 255 Width = 1506 Height = 436 Align = alClient BorderStyle = cxcbsNone PopupMenu = pm_sub TabOrder = 3 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> 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 Column = cxGridDBColumn20 end item Format = '0' Position = spFooter Column = cxGridDBColumn22 end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = cxGridDBColumn20 end item Kind = skSum end item Kind = skSum Column = cxGridDBColumn23 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 cxGridDBColumn13: TcxGridDBColumn Tag = 9 Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 41 end object cxGridDBColumn14: TcxGridDBColumn Caption = #24207#21495 DataBinding.FieldName = 'SerialNo' HeaderAlignmentHorz = taCenter SortIndex = 0 SortOrder = soAscending Styles.Header = DataLink_PurchasePlan.Default Width = 55 end object cxGridDBColumn15: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'C_Code' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1Column10PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 77 end object cxGridDBColumn16: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'C_Name' HeaderAlignmentHorz = taCenter Width = 70 end object cxGridDBColumn17: TcxGridDBColumn Caption = #35268#26684 DataBinding.FieldName = 'C_Spec' HeaderAlignmentHorz = taCenter Width = 60 end object cxGridDBColumn18: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'C_Composition' HeaderAlignmentHorz = taCenter Width = 70 end object cxGridDBColumn19: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'C_Color' HeaderAlignmentHorz = taCenter Width = 70 end object cxGridDBColumn20: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_PurchasePlan.Default Width = 70 end object cxGridDBColumn21: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( 'Kg' 'M' 'Y') HeaderAlignmentHorz = taCenter Styles.Header = DataLink_PurchasePlan.Default Width = 58 end object cxGridDBColumn22: TcxGridDBColumn Caption = #21333#20215 DataBinding.FieldName = 'Price' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1PRTOrderQtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Header = DataLink_PurchasePlan.handBlack Width = 70 end object cxGridDBColumn23: TcxGridDBColumn Caption = #37329#39069 DataBinding.FieldName = 'Amount' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 84 end object cxGridDBColumn24: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'SNote' HeaderAlignmentHorz = taCenter Width = 70 end end object cxGridLevel1: TcxGridLevel GridView = TV1 end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Left = 1177 Top = 104 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Left = 1081 Top = 97 end inherited ImageList_new32: TImageList Left = 968 Top = 360 end object ADOTemp: TADOQuery Connection = DataLink_PurchasePlan.ADOLink LockType = ltReadOnly Parameters = <> Left = 728 Top = 65533 end object ADOCmd: TADOQuery Connection = DataLink_PurchasePlan.ADOLink Parameters = <> Left = 968 Top = 133 end object DS_1: TDataSource DataSet = Order_Sub Left = 860 Top = 404 end object Order_Sub: TClientDataSet Aggregates = <> IndexFieldNames = 'SerialNo' Params = <> Left = 716 Top = 404 end object cxgrdpmn1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 464 Top = 348 end object pm_sub: TPopupMenu Left = 624 Top = 536 object N1: TMenuItem Caption = #26222#36890#26367#25442 OnClick = N1Click end object N2: TMenuItem Caption = #20135#21697#26367#25442 OnClick = N2Click end end end