inherited frmLXList: TfrmLXList Top = 39 Caption = #31867#22411#21015#34920 ClientHeight = 509 ClientWidth = 1523 Font.Height = -16 ExplicitWidth = 1539 ExplicitHeight = 548 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1523 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_Company.cxImageList_bar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_Company.cxImageList_bar List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 3 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 1 OnClick = TBRafreshClick end object TBFind: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 0 OnClick = TBFindClick end object TBAdd: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 9 OnClick = TBAddClick end object TBEdit: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 3 OnClick = TBEditClick end object TBDel: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 5 OnClick = TBDelClick end object TBView: TToolButton Left = 315 Top = 0 AutoSize = True Caption = #26597#30475 ImageIndex = 8 OnClick = TBViewClick end object TBExport: TToolButton Left = 378 Top = 0 AutoSize = True Caption = #23548#20986 ImageIndex = 20 OnClick = TBExportClick end object TBClose: TToolButton Left = 441 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object Panel1: TPanel [1] Left = 0 Top = 30 Width = 1523 Height = 52 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clWhite ParentBackground = False TabOrder = 5 object Label7: TLabel Left = 37 Top = 14 Width = 32 Height = 21 Caption = #31867#22411 end object LXName: TEdit Tag = 2 Left = 75 Top = 13 Width = 150 Height = 29 TabOrder = 0 OnChange = EENameChange end end object cxDBTreeList1: TcxDBTreeList [2] Left = 0 Top = 82 Width = 225 Height = 427 Align = alLeft Bands = < item end> DataController.DataSource = DataSource2 DataController.ParentField = 'DPParent' DataController.KeyField = 'DPID' Navigator.Buttons.CustomButtons = <> OptionsBehavior.CopyCaptionsToClipboard = False OptionsBehavior.ExpandOnDblClick = False OptionsSelection.CellSelect = False OptionsView.CellAutoHeight = True OptionsView.Headers = False RootValue = -1 ScrollbarAnnotations.CustomAnnotations = <> TabOrder = 2 Visible = False OnDblClick = cxDBTreeList1DblClick object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn DataBinding.FieldName = 'DPName' Width = 210 Position.ColIndex = 0 Position.RowIndex = 0 Position.BandIndex = 0 Summary.FooterSummaryItems = <> Summary.GroupFooterSummaryItems = <> end end object cxSplitter1: TcxSplitter [3] Left = 225 Top = 82 Width = 8 Height = 427 HotZoneClassName = 'TcxMediaPlayer9Style' Control = cxDBTreeList1 end object TPanel [4] Left = 233 Top = 82 Width = 1290 Height = 427 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object cxTabControl1: TcxTabControl Left = 2 Top = 2 Width = 1286 Height = 29 Align = alTop Color = clWhite ParentBackground = False ParentColor = False TabOrder = 0 Visible = False Properties.CustomButtons.Buttons = <> Properties.Style = 9 Properties.TabIndex = 2 Properties.Tabs.Strings = ( #22312#32844 #31163#32844 #20840#37096) LookAndFeel.Kind = lfUltraFlat OnChange = cxTabControl1Change ClientRectRight = 0 ClientRectTop = 0 end object cxGrid1: TcxGrid Left = 2 Top = 31 Width = 1286 Height = 394 Align = alClient PopupMenu = PopupMenu1 TabOrder = 1 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DataSource1 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.GroupByBox = False OptionsView.GroupFooters = gfAlwaysVisible object v1Column4: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True HeaderAlignmentHorz = taCenter Width = 52 end object Tv1Column1: TcxGridDBColumn Caption = #31867#22411 DataBinding.FieldName = 'LXName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 200 end object Tv1Column2: TcxGridDBColumn Caption = #20215#26684 DataBinding.FieldName = 'LXPrice' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 200 end object Tv1Column3: TcxGridDBColumn Caption = #24037#31181 DataBinding.FieldName = 'GZ' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 200 end object Tv1Column5: TcxGridDBColumn Caption = #23703#20301 DataBinding.FieldName = 'GW' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 200 end object Tv1Column6: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'DW' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 200 end object Tv1Column4: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 200 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end end inherited cxProgressBar2: TcxProgressBar Left = 680 Top = 255 ExplicitLeft = 680 ExplicitTop = 255 ExplicitHeight = 28 end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_Company.ADOLink Left = 435 Top = 282 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_Company.ADOLink Left = 249 Top = 231 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 727 Top = 290 end object ADOQueryCmd: TADOQuery Connection = DataLink_Company.ADOLink Parameters = <> Left = 432 Top = 200 end object ADOQueryMain: TADOQuery Connection = DataLink_Company.ADOLink LockType = ltReadOnly Parameters = <> Left = 392 Top = 200 end object ADOQueryTemp: TADOQuery Connection = DataLink_Company.ADOLink LockType = ltReadOnly Parameters = <> Left = 357 Top = 203 end object DataSource1: TDataSource DataSet = Order_Main Left = 497 Top = 201 end object Order_Main: TClientDataSet Aggregates = <> Params = <> Left = 531 Top = 200 end object PopupMenu1: TPopupMenu Left = 321 Top = 205 object N2: TMenuItem Caption = #20840#36873 OnClick = N2Click end object N1: TMenuItem Caption = #20840#24323 OnClick = N1Click end end object DataSource2: TDataSource DataSet = CDS_Tree Left = 147 Top = 219 end object CDS_Tree: TClientDataSet Aggregates = <> Params = <> Left = 96 Top = 256 end object ADOQueryTree: TADOQuery Connection = DataLink_Company.ADOLink LockType = ltReadOnly Parameters = <> Left = 117 Top = 145 end object ADOQuery1: TADOQuery Connection = DataLink_Company.ADOLink Parameters = <> Left = 460 Top = 200 end object cxStyleRepository1: TcxStyleRepository Left = 277 Top = 296 PixelsPerInch = 96 object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end end end