object frmYGYPInPut_CLWXDJ: TfrmYGYPInPut_CLWXDJ Left = 314 Top = 156 Width = 876 Height = 526 Caption = #36710#36742#32500#20462#30331#35760 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 860 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_WTOA.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object TBSave: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 15 OnClick = TBSaveClick end object TADD: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 12 OnClick = TAddClick end object TDel: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 13 OnClick = TDelClick 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 = 860 Height = 459 Align = alClient PopupMenu = PopupMenu1 TabOrder = 1 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum Column = v1WXMoney end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = cxStyle1 object v1WXDate: TcxGridDBColumn Caption = #36865#20462#26085#26399 DataBinding.FieldName = 'WXDate' PropertiesClassName = 'TcxDateEditProperties' HeaderAlignmentHorz = taCenter Width = 80 end object v1SXName: TcxGridDBColumn Caption = #36865#20462#20154 DataBinding.FieldName = 'SXName' HeaderAlignmentHorz = taCenter Width = 75 end object v1CLName: TcxGridDBColumn Caption = #36710#36742#21517#31216 DataBinding.FieldName = 'CLName' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> HeaderAlignmentHorz = taCenter Width = 79 end object v1CLNO: TcxGridDBColumn Caption = #36710#29260#21495#30721 DataBinding.FieldName = 'CLNO' HeaderAlignmentHorz = taCenter Width = 70 end object v1WXMoney: TcxGridDBColumn Caption = #32500#20462#37329#39069 DataBinding.FieldName = 'WXMoney' HeaderAlignmentHorz = taCenter Width = 80 end object v1WXFactory: TcxGridDBColumn Caption = #32500#20462#21378 DataBinding.FieldName = 'WXFactory' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1WXFactoryPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 78 end object v1WXXianMu: TcxGridDBColumn Caption = #32500#20462#39033#30446 DataBinding.FieldName = 'WXXianMu' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1WXXianMuPropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 80 end object v1WXNote: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'WXNote' HeaderAlignmentHorz = taCenter Width = 142 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_WTOA.ADOLink LockType = ltReadOnly Parameters = <> Left = 444 Top = 89 end object ADOCmd: TADOQuery Connection = DataLink_WTOA.ADOLink Parameters = <> Left = 412 Top = 89 end object PopupMenu1: TPopupMenu Left = 378 Top = 90 object N1: TMenuItem Caption = #22686#21152#22270#29255 end object N2: TMenuItem Caption = #21024#38500#22270#29255 end end object DataSource1: TDataSource DataSet = Order_Sub Left = 482 Top = 89 end object Order_Sub: TClientDataSet Aggregates = <> Params = <> Left = 520 Top = 90 end object cxStyleRepository1: TcxStyleRepository object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end end object ADOQuery2: TADOQuery Connection = DataLink_WTOA.ADOLink Parameters = <> Left = 556 Top = 89 end end