object frmKDInPut: TfrmKDInPut Left = 189 Top = 133 Width = 1381 Height = 695 Caption = #23492#20214#20449#24687#24405#20837 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 107 TextHeight = 13 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1365 Height = 29 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_WTOA.ThreeImgList List = True ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 5 OnClick = TBSaveClick end object ToolButton3: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 12 OnClick = ToolButton3Click end object ToolButton4: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 13 OnClick = ToolButton4Click end object TBClose: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object cxGrid1: TcxGrid Left = 0 Top = 29 Width = 1365 Height = 330 Align = alClient TabOrder = 1 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False OnCellClick = Tv1CellClick DataController.DataSource = DataSource1 DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum Column = v1Column3 end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum Column = v1Column2 end item Kind = skSum Column = v1HKMoney end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.GroupFooters = gfAlwaysVisible Styles.Header = DataLink_WTOA.Default object v1Column10: TcxGridDBColumn Caption = #23492#20214#26085#26399 DataBinding.FieldName = 'KDDate' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 76 end object v1ConNo: TcxGridDBColumn Caption = #21512#21516#21495 DataBinding.FieldName = 'ConNo' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1ConNoPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 70 end object v1Column5: TcxGridDBColumn Caption = #24555#36882#21333#21495 DataBinding.FieldName = 'KDNo' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taRightJustify Width = 99 end object v1Column1: TcxGridDBColumn Caption = #24555#36882#20844#21496 DataBinding.FieldName = 'KDComName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column1PropertiesButtonClick HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 79 end object v1Column11: TcxGridDBColumn Caption = #23492#20214#20154 DataBinding.FieldName = 'JYPerson' PropertiesClassName = 'TcxTextEditProperties' Properties.CharCase = ecUpperCase HeaderAlignmentHorz = taCenter Width = 78 end object v1Column12: TcxGridDBColumn Caption = #19994#21153#21161#29702 DataBinding.FieldName = 'YWZhuLi' PropertiesClassName = 'TcxTextEditProperties' Properties.CharCase = ecUpperCase HeaderAlignmentHorz = taCenter Width = 82 end object v1KHName: TcxGridDBColumn Caption = #25910#20214#20154 DataBinding.FieldName = 'KHName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column18PropertiesButtonClick Properties.OnEditValueChanged = v1KHNamePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 94 end object v1Column6: TcxGridDBColumn Caption = #25910#20214#22320#22336 DataBinding.FieldName = 'ToPlace' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1Column6PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 75 end object v1FKName: TcxGridDBColumn Caption = #20184#27454#20154 DataBinding.FieldName = 'FKName' HeaderAlignmentHorz = taCenter Width = 76 end object v1Column13: TcxGridDBColumn Caption = #25910#20214#20154#32852#31995#26041#24335 DataBinding.FieldName = 'KHLXFS' HeaderAlignmentHorz = taCenter Width = 97 end object v1Column9: TcxGridDBColumn Caption = #25910#20214#22320#21306 DataBinding.FieldName = 'Country' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column9PropertiesButtonClick HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 80 end object v1Column8: TcxGridDBColumn Caption = #23492#20214#36135#29289#35814#24773 DataBinding.FieldName = 'KDInfo' HeaderAlignmentHorz = taCenter Width = 87 end object v1Column14: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' HeaderAlignmentHorz = taCenter Width = 58 end object v1Column2: TcxGridDBColumn Caption = #24555#36882#36153#29992 DataBinding.FieldName = 'KDMoneyS' HeaderAlignmentHorz = taCenter Width = 72 end object v1FeeShouQuType: TcxGridDBColumn Caption = #36153#29992#25910#21462#26041#24335 DataBinding.FieldName = 'FeeShouQuType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #20844#36153 #33258#36153 #29616#37329) HeaderAlignmentHorz = taCenter Width = 94 end object v1Column20: TcxGridDBColumn Caption = #23492#20214#31867#22411 DataBinding.FieldName = 'KDType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #21253#35065 #24555#36882#34955 #25991#20214) Visible = False HeaderAlignmentHorz = taCenter Width = 72 end object v1Column4: TcxGridDBColumn Caption = #20184#27454#26041#24335 DataBinding.FieldName = 'FKType' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #23492#20184 #21040#20184 #20195#20184) HeaderAlignmentHorz = taCenter Width = 72 end object v1Column3: TcxGridDBColumn Caption = #37325#37327'(KG)' DataBinding.FieldName = 'KgQty' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 78 end object v1IFDS: TcxGridDBColumn Caption = #26159#21542#20195#25910#36135#27454 DataBinding.FieldName = 'IFDS' PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsFixedList Properties.Items.Strings = ( #26159 '') HeaderAlignmentHorz = taCenter Width = 84 end object v1HKMoney: TcxGridDBColumn Caption = #36135#27454#37329#39069 DataBinding.FieldName = 'HKMoney' HeaderAlignmentHorz = taCenter Width = 69 end object v1Note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Width = 147 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ToolBar2: TToolBar Left = 0 Top = 359 Width = 1365 Height = 29 Align = alBottom ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_WTOA.ThreeImgList List = True ParentFont = False ShowCaptions = True TabOrder = 2 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 15 OnClick = ToolButton1Click end object TYPADD: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #26679#21697#22686#34892 ImageIndex = 12 OnClick = TYPADDClick end object ToolButton2: TToolButton Left = 150 Top = 0 AutoSize = True Caption = #33457#22411#22686#34892 ImageIndex = 12 OnClick = ToolButton2Click end object ToADD: TToolButton Left = 237 Top = 0 AutoSize = True Caption = #25163#21160#22686#34892 ImageIndex = 12 OnClick = ToADDClick end object ToolButton5: TToolButton Left = 324 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 13 OnClick = ToolButton5Click end end object cxGrid2: TcxGrid Left = 0 Top = 388 Width = 1365 Height = 267 Align = alBottom TabOrder = 3 object Tv2: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource2 DataController.Summary.DefaultGroupSummaryItems = < item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum Position = spFooter end item Kind = skSum 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 item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.GroupFooters = gfAlwaysVisible Styles.Inactive = DataLink_WTOA.SkyBlue Styles.IncSearch = DataLink_WTOA.SkyBlue Styles.Selection = DataLink_WTOA.SkyBlue Styles.Header = DataLink_WTOA.Default object cxGridDBColumn3: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'CYNO' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = cxGridDBColumn3PropertiesEditValueChanged HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 115 end object v2Column2: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'CYName' HeaderAlignmentHorz = taCenter Width = 92 end object cxGridDBColumn4: TcxGridDBColumn Caption = #25104#20998 DataBinding.FieldName = 'CYCF' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 104 end object cxGridDBColumn5: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'CYMF' HeaderAlignmentHorz = taCenter Width = 99 end object cxGridDBColumn6: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'CYKZ' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 99 end object cxGridDBColumn9: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'Qty' HeaderAlignmentHorz = taCenter Width = 72 end object cxGridDBColumn10: TcxGridDBColumn Caption = #25968#37327#21333#20301 DataBinding.FieldName = 'QtyUnit' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Width = 69 end object cxGridDBColumn17: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' HeaderAlignmentHorz = taCenter Width = 104 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object ADOTemp: TADOQuery Connection = DataLink_WTOA.ADOLink LockType = ltReadOnly Parameters = <> Left = 344 Top = 77 end object ADOCmd: TADOQuery Connection = DataLink_WTOA.ADOLink Parameters = <> Left = 373 Top = 75 end object DataSource1: TDataSource DataSet = Order_Sub Left = 471 Top = 80 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 398 Top = 76 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 434 Top = 78 end object DataSource2: TDataSource DataSet = ClientDataSet2 Left = 630 Top = 422 end object cxGridPopupMenu2: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 665 Top = 424 end object ClientDataSet2: TClientDataSet Aggregates = <> Params = <> Left = 701 Top = 425 end end