object frmBizCateSel: TfrmBizCateSel Left = 400 Top = 200 Caption = #19994#21153#22823#31867#26126#32454#39033#36873#25321 ClientHeight = 500 ClientWidth = 700 Color = clWhite Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar Tag = 1 Left = 0 Top = 0 Width = 700 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' DisabledImages = DataLink_Financial.cxImageList_bar Images = DataLink_Financial.cxImageList_bar List = True ShowCaptions = True TabOrder = 0 object TBOK: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #30830#23450 ImageIndex = 12 OnClick = TBOKClick end object TBAdd: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #22686#34892 ImageIndex = 2 OnClick = TBAddClick end object TBDel: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #21024#34892 ImageIndex = 6 OnClick = TBDelClick end object TBEdit: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 3 OnClick = TBEditClick end object TBClose: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object cxGrid1: TcxGrid Left = 0 Top = 30 Width = 700 Height = 470 Align = alClient TabOrder = 1 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False ScrollbarAnnotations.CustomAnnotations = <> OnCellDblClick = Tv1CellDblClick DataController.DataSource = DS_1 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsSelection.CellSelect = False OptionsView.GroupByBox = False OptionsView.Indicator = True object Tv1BizCate: TcxGridDBColumn Caption = #19994#21153#22823#31867 DataBinding.FieldName = 'BizCate' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = Tv1BizCatePropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 240 end object Tv1BizItem: TcxGridDBColumn Caption = #26126#32454#39033 DataBinding.FieldName = 'BizItem' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = Tv1BizItemPropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 240 end object Tv1CateNo: TcxGridDBColumn Caption = #22823#31867#32534#21495 DataBinding.FieldName = 'CateNo' DataBinding.IsNullValueType = True Visible = False HeaderAlignmentHorz = taCenter Width = 80 end object Tv1ItemNo: TcxGridDBColumn Caption = #26126#32454#32534#21495 DataBinding.FieldName = 'ItemNo' DataBinding.IsNullValueType = True Visible = False HeaderAlignmentHorz = taCenter Width = 80 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object DS_1: TDataSource DataSet = CDS_1 Left = 96 Top = 120 end object CDS_1: TClientDataSet Aggregates = <> Params = <> Left = 168 Top = 120 end object ADOQueryTmp: TADOQuery Connection = DataLink_Financial.ADOLink Parameters = <> Left = 560 Top = 120 end object ADOQueryCmd: TADOQuery Connection = DataLink_Financial.ADOLink Parameters = <> Left = 656 Top = 120 end end