object frmXHInPut: TfrmXHInPut Left = 189 Top = 127 Width = 1164 Height = 596 Caption = #29616#36135#21450#26679#24067#20449#24687#30331#35760 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1148 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeManage.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = TBSaveClick end object TADD: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 103 OnClick = TADDClick end object TDEL: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 107 OnClick = TDELClick end object TBClose: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object cxGrid1: TcxGrid Left = 0 Top = 29 Width = 1148 Height = 529 Align = alClient TabOrder = 1 object TV1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 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 item Format = '0' Position = spFooter end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = V1PRTOrderQty end item Kind = skSum end item Kind = skSum Column = V2XHMoney end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Inactive = DataLink_TradeManage.SHuangSe Styles.IncSearch = DataLink_TradeManage.SHuangSe Styles.Selection = DataLink_TradeManage.SHuangSe Styles.Header = DataLink_TradeManage.Default object V1filltime: TcxGridDBColumn Tag = 2 Caption = #30331#35760#26085#26399 DataBinding.FieldName = 'filltime' PropertiesClassName = 'TcxDateEditProperties' Properties.SaveTime = False Properties.ShowTime = False HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 70 end object V1CostomerNoName: TcxGridDBColumn Tag = 2 Caption = #23458#25143 DataBinding.FieldName = 'CostomerNoName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = V1CostomerNoNamePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object V2Column2: TcxGridDBColumn Tag = 2 Caption = #32534#21495 DataBinding.FieldName = 'PrtCode' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = V2Column2PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 91 end object v1Column5: TcxGridDBColumn Tag = 2 Caption = #21697#21517 DataBinding.FieldName = 'PrtCodeName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column5PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 84 end object v1Column6: TcxGridDBColumn Tag = 2 Caption = #35268#26684#25104#20221 DataBinding.FieldName = 'PRTspec' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column6PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 73 end object v1PRTColor: TcxGridDBColumn Tag = 2 Caption = #39068#33394 DataBinding.FieldName = 'PRTColor' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False Properties.OnButtonClick = v1PRTColorPropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Styles.Header = DataLink_TradeManage.handBlack Width = 85 end object v1Column7: TcxGridDBColumn Tag = 2 Caption = #38376#24133 DataBinding.FieldName = 'PRTMF' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column7PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 73 end object v1Column8: TcxGridDBColumn Tag = 2 Caption = #20811#37325 DataBinding.FieldName = 'PRTKZ' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column8PropertiesButtonClick HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 78 end object V1PRTOrderQty: TcxGridDBColumn Tag = 2 Caption = #25968#37327 DataBinding.FieldName = 'PRTOrderQty' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = V1PRTOrderQtyPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 76 end object v1OrderUnit: TcxGridDBColumn Tag = 2 Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'OrderUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'M' 'Y' 'Kg') HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 82 end object v1PRTPrice: TcxGridDBColumn Tag = 2 Caption = #21333#20215 DataBinding.FieldName = 'PRTPrice' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v1PRTPricePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 84 end object v1PriceUnit: TcxGridDBColumn Tag = 2 Caption = #24065#31181 DataBinding.FieldName = 'PriceUnit' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( 'USD' 'RMB') HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 87 end object V2XHMoney: TcxGridDBColumn Tag = 2 Caption = #37329#39069 DataBinding.FieldName = 'XHMoney' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 87 end object V1XHNote: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'XHNote' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 87 end end object cxGridLevel1: TcxGridLevel GridView = TV1 end end object ADOTemp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 640 Top = 65533 end object ADOCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 584 Top = 65533 end object ADOQuery1: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 608 Top = 65533 end object DataSource1: TDataSource DataSet = Order_Sub Left = 240 Top = 368 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 208 Top = 368 end end