object frmYGYPInPut_CLSQDJ: TfrmYGYPInPut_CLSQDJ Left = 294 Top = 136 Width = 890 Height = 546 Caption = #36710#36742#20986#36710#30003#35831#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 = 874 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 = 874 Height = 479 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 = v1CCMoney end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = cxStyle1 object v1SQDate: TcxGridDBColumn Caption = #29992#36710#26085#26399 DataBinding.FieldName = 'SQDate' PropertiesClassName = 'TcxDateEditProperties' HeaderAlignmentHorz = taCenter Width = 80 end object v1SQName: TcxGridDBColumn Caption = #29992#36710#20154#22995#21517 DataBinding.FieldName = 'SQName' HeaderAlignmentHorz = taCenter Options.Editing = False 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 Options.Editing = False Width = 79 end object v1CLNO: TcxGridDBColumn Caption = #36710#29260#21495#30721 DataBinding.FieldName = 'CLNO' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object v1CCMoney: TcxGridDBColumn Caption = #20986#36710#37329#39069 DataBinding.FieldName = 'CCMoney' HeaderAlignmentHorz = taCenter Width = 80 end object v1FeeType: TcxGridDBColumn Caption = #36153#29992#31867#22411 DataBinding.FieldName = 'FeeType' PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( #33258#36153 #20844#36153 '') HeaderAlignmentHorz = taCenter Width = 78 end object v1TOPlace: TcxGridDBColumn Caption = #30446#30340#22320 DataBinding.FieldName = 'TOPlace' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.OnButtonClick = v1TOPlacePropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 80 end object v1SQNote: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'SQNote' HeaderAlignmentHorz = taCenter Width = 142 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object ADOTemp: TADOQuery Connection = DataLink_WTOA.ADOLink 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