object frmCPAllTop: TfrmCPAllTop Left = 88 Top = 58 Width = 1283 Height = 669 Caption = #20135#21697'Top20'#25490#34892#27036 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 120 TextHeight = 15 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1265 Height = 31 ButtonHeight = 30 ButtonWidth = 65 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_BIView.ThreeImgList Flat = True Images = DataLink_BIView.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object Panel1: TPanel Left = 0 Top = 0 Width = 297 Height = 30 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label1: TLabel Left = 307 Top = 9 Width = 30 Height = 15 Caption = #21697#21517 Visible = False end object Label5: TLabel Left = 14 Top = 9 Width = 60 Height = 15 Caption = #26597#35810#26085#26399 end object Label6: TLabel Left = 170 Top = 9 Width = 15 Height = 15 Caption = #33267 end object C_Code: TEdit Tag = 2 Left = 331 Top = 5 Width = 89 Height = 20 ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861 TabOrder = 0 Visible = False OnChange = C_CodeNameChange end object BegDate: TDateTimePicker Left = 64 Top = 5 Width = 102 Height = 23 Date = 40675.000000000000000000 Time = 40675.000000000000000000 TabOrder = 1 end object EndDate: TDateTimePicker Left = 184 Top = 5 Width = 102 Height = 23 Date = 40675.000000000000000000 Time = 40675.000000000000000000 TabOrder = 2 end end object TBRafresh: TToolButton Left = 297 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 0 OnClick = TBRafreshClick end object ToolButton2: TToolButton Left = 366 Top = 0 AutoSize = True Caption = #36807#28388 ImageIndex = 20 Visible = False OnClick = ToolButton2Click end object TBClose: TToolButton Left = 435 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel2: TPanel Left = 0 Top = 31 Width = 1265 Height = 372 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Panel3: TPanel Left = 2 Top = 2 Width = 368 Height = 368 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 0 object cxGrid1: TcxGrid Left = 2 Top = 25 Width = 364 Height = 317 Align = alClient TabOrder = 0 object Tv1: TcxGridDBTableView OnDblClick = Tv1DblClick Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> 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 Column = v2Column15 end item Kind = skSum Column = v2Column7 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.GroupByBox = False Styles.Inactive = DataLink_BIView.SHuangSe Styles.IncSearch = DataLink_BIView.SHuangSe Styles.Selection = DataLink_BIView.SHuangSe Styles.Header = DataLink_BIView.handBlack object v1Column1: TcxGridDBColumn Caption = #25490#21517 DataBinding.FieldName = 'XH' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 35 end object v2Column12: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'SPName' PropertiesClassName = 'TcxTextEditProperties' Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 126 end object v2Column15: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 48 end object v2Column7: TcxGridDBColumn Caption = #21344#27604'%' DataBinding.FieldName = 'BL' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 44 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object SH2: TPanel Left = 2 Top = 342 Width = 364 Height = 24 Align = alBottom BevelOuter = bvNone Caption = #25910#36135#24635#25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object SH1: TPanel Left = 2 Top = 2 Width = 364 Height = 23 Align = alTop BevelOuter = bvNone Caption = #25910#36135'Top20'#25490#34892#27036 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end object Panel6: TPanel Left = 370 Top = 2 Width = 369 Height = 368 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 1 object cxGrid2: TcxGrid Left = 2 Top = 25 Width = 365 Height = 317 Align = alClient TabOrder = 0 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource2 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> 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 Column = cxGridDBColumn3 end item Kind = skSum Column = cxGridDBColumn4 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.GroupByBox = False Styles.Inactive = DataLink_BIView.SHuangSe Styles.IncSearch = DataLink_BIView.SHuangSe Styles.Selection = DataLink_BIView.SHuangSe Styles.Header = DataLink_BIView.handBlack object cxGridDBColumn1: TcxGridDBColumn Caption = #25490#21517 DataBinding.FieldName = 'XH' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 35 end object cxGridDBColumn2: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'SPName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 126 end object cxGridDBColumn3: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 48 end object cxGridDBColumn4: TcxGridDBColumn Caption = #21344#27604'%' DataBinding.FieldName = 'BL' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 44 end end object cxGridLevel2: TcxGridLevel GridView = Tv2 end end object KK2: TPanel Left = 2 Top = 342 Width = 365 Height = 24 Align = alBottom BevelOuter = bvNone Caption = #24320#21345#24635#25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object KK1: TPanel Left = 2 Top = 2 Width = 365 Height = 23 Align = alTop BevelOuter = bvNone Caption = #24320#21345'Top20'#25490#34892#27036 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end object Panel8: TPanel Left = 739 Top = 2 Width = 369 Height = 368 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 2 object cxGrid3: TcxGrid Left = 2 Top = 25 Width = 365 Height = 317 Align = alClient TabOrder = 0 object Tv3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource3 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> 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 Column = cxGridDBColumn7 end item Kind = skSum Column = cxGridDBColumn8 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.GroupByBox = False Styles.Inactive = DataLink_BIView.SHuangSe Styles.IncSearch = DataLink_BIView.SHuangSe Styles.Selection = DataLink_BIView.SHuangSe Styles.Header = DataLink_BIView.handBlack object cxGridDBColumn5: TcxGridDBColumn Caption = #25490#21517 DataBinding.FieldName = 'XH' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 35 end object cxGridDBColumn6: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'SPName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 126 end object cxGridDBColumn7: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 48 end object cxGridDBColumn8: TcxGridDBColumn Caption = #21344#27604'%' DataBinding.FieldName = 'BL' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 44 end end object cxGridLevel3: TcxGridLevel GridView = Tv3 end end object DJ2: TPanel Left = 2 Top = 342 Width = 365 Height = 24 Align = alBottom BevelOuter = bvNone Caption = #25171#21367#24635#25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object DJ1: TPanel Left = 2 Top = 2 Width = 365 Height = 23 Align = alTop BevelOuter = bvNone Caption = #25171#21367'Top20'#25490#34892#27036 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end object Panel9: TPanel Left = 1108 Top = 2 Width = 369 Height = 368 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 3 object cxGrid4: TcxGrid Left = 2 Top = 25 Width = 365 Height = 317 Align = alClient TabOrder = 0 object Tv4: TcxGridDBTableView OnDblClick = Tv4DblClick Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False DataController.DataSource = DataSource4 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> 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 Column = cxGridDBColumn11 end item Kind = skSum Column = cxGridDBColumn12 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.GroupByBox = False Styles.Inactive = DataLink_BIView.SHuangSe Styles.IncSearch = DataLink_BIView.SHuangSe Styles.Selection = DataLink_BIView.SHuangSe Styles.Header = DataLink_BIView.handBlack object cxGridDBColumn9: TcxGridDBColumn Caption = #25490#21517 DataBinding.FieldName = 'XH' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 35 end object cxGridDBColumn10: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'SPName' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 126 end object cxGridDBColumn11: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'PS' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 48 end object cxGridDBColumn12: TcxGridDBColumn Caption = #21344#27604'%' DataBinding.FieldName = 'BL' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 44 end end object cxGridLevel4: TcxGridLevel GridView = Tv4 end end object CH2: TPanel Left = 2 Top = 342 Width = 365 Height = 24 Align = alBottom BevelOuter = bvNone Caption = #20986#36135#24635#25968#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object CH1: TPanel Left = 2 Top = 2 Width = 365 Height = 23 Align = alTop BevelOuter = bvNone Caption = #20986#36135'Top20'#25490#34892#27036 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end end object Panel4: TPanel Left = 0 Top = 403 Width = 1265 Height = 219 Align = alBottom Caption = 'Panel4' Color = clSkyBlue TabOrder = 2 object Panel5: TPanel Left = 1 Top = 1 Width = 370 Height = 217 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object DBChart1: TDBChart Left = 2 Top = 2 Width = 366 Height = 213 AllowPanning = pmVertical BackWall.Brush.Color = clWhite Gradient.EndColor = clWhite Gradient.Visible = True LeftWall.Color = clWhite Title.Text.Strings = ( '') Title.Visible = False AxisVisible = False Legend.Visible = False View3D = False View3DOptions.Elevation = 315 View3DOptions.Orthogonal = False View3DOptions.Perspective = 0 View3DOptions.Rotation = 360 Align = alClient BevelOuter = bvNone TabOrder = 0 object Series1: TBarSeries HorizAxis = aTopAxis Marks.ArrowLength = 20 Marks.Clip = True Marks.Visible = True SeriesColor = clRed BarStyle = bsRectGradient XValues.DateTime = False XValues.Name = 'X' XValues.Multiplier = 1.000000000000000000 XValues.Order = loAscending YValues.DateTime = False YValues.Name = 'Bar' YValues.Multiplier = 1.000000000000000000 YValues.Order = loNone end end end object Panel7: TPanel Left = 371 Top = 1 Width = 369 Height = 217 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object DBChart2: TDBChart Left = 2 Top = 2 Width = 365 Height = 213 BackWall.Brush.Color = clWhite Gradient.EndColor = clWhite Gradient.Visible = True LeftWall.Color = clWhite Title.Text.Strings = ( '') Title.Visible = False AxisVisible = False Legend.Visible = False View3D = False View3DOptions.Elevation = 315 View3DOptions.Orthogonal = False View3DOptions.Perspective = 0 View3DOptions.Rotation = 360 Align = alClient TabOrder = 0 object Series2: TBarSeries Marks.ArrowLength = 20 Marks.Visible = True SeriesColor = clRed BarStyle = bsRectGradient XValues.DateTime = False XValues.Name = 'X' XValues.Multiplier = 1.000000000000000000 XValues.Order = loAscending YValues.DateTime = False YValues.Name = 'Bar' YValues.Multiplier = 1.000000000000000000 YValues.Order = loNone end end end object Panel11: TPanel Left = 740 Top = 1 Width = 369 Height = 217 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object DBChart3: TDBChart Left = 2 Top = 2 Width = 365 Height = 213 BackWall.Brush.Color = clWhite Gradient.EndColor = clWhite Gradient.Visible = True LeftWall.Color = clWhite Title.Text.Strings = ( '') Title.Visible = False AxisVisible = False Legend.Visible = False View3D = False View3DOptions.Elevation = 315 View3DOptions.Orthogonal = False View3DOptions.Perspective = 0 View3DOptions.Rotation = 360 Align = alClient TabOrder = 0 object BarSeries1: TBarSeries Marks.ArrowLength = 20 Marks.Visible = True SeriesColor = clRed BarStyle = bsRectGradient XValues.DateTime = False XValues.Name = 'X' XValues.Multiplier = 1.000000000000000000 XValues.Order = loAscending YValues.DateTime = False YValues.Name = 'Bar' YValues.Multiplier = 1.000000000000000000 YValues.Order = loNone end end end object Panel13: TPanel Left = 1109 Top = 1 Width = 370 Height = 217 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 3 object DBChart4: TDBChart Left = 2 Top = 2 Width = 366 Height = 213 BackWall.Brush.Color = clWhite Gradient.EndColor = clWhite Gradient.Visible = True LeftWall.Color = clWhite Title.Text.Strings = ( '') Title.Visible = False AxisVisible = False Legend.Visible = False View3D = False View3DOptions.Elevation = 315 View3DOptions.Orthogonal = False View3DOptions.Perspective = 0 View3DOptions.Rotation = 360 Align = alClient TabOrder = 0 object BarSeries2: TBarSeries Marks.ArrowLength = 20 Marks.Visible = True SeriesColor = clRed BarStyle = bsRectGradient XValues.DateTime = False XValues.Name = 'X' XValues.Multiplier = 1.000000000000000000 XValues.Order = loAscending YValues.DateTime = False YValues.Name = 'Bar' YValues.Multiplier = 1.000000000000000000 YValues.Order = loNone end end end end object Panel10: TPanel Left = 600 Top = 260 Width = 311 Height = 51 BevelInner = bvRaised BevelOuter = bvLowered Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 Visible = False end object ADOQueryTemp: TADOQuery Connection = DataLink_BIView.ADOLink LockType = ltReadOnly Parameters = <> Left = 789 Top = 9 end object ADOQueryCmd: TADOQuery Connection = DataLink_BIView.ADOLink Parameters = <> Left = 829 Top = 1 end object ADOQueryMain: TADOQuery Connection = DataLink_BIView.ADOLink LockType = ltReadOnly Parameters = <> Left = 893 Top = 229 end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 100 Top = 184 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 92 Top = 264 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 91 Top = 227 end object DataSource2: TDataSource DataSet = ClientDataSet2 Left = 467 Top = 163 end object ClientDataSet2: TClientDataSet Aggregates = <> Params = <> Left = 468 Top = 200 end object DataSource3: TDataSource DataSet = ClientDataSet3 Left = 787 Top = 179 end object ClientDataSet3: TClientDataSet Aggregates = <> Params = <> Left = 788 Top = 216 end object DataSource4: TDataSource DataSet = ClientDataSet4 Left = 955 Top = 187 end object ClientDataSet4: TClientDataSet Aggregates = <> Params = <> Left = 956 Top = 224 end object ClientDataSet11: TClientDataSet Aggregates = <> Params = <> Left = 92 Top = 304 end object ClientDataSet21: TClientDataSet Aggregates = <> Params = <> Left = 476 Top = 264 end object ClientDataSet31: TClientDataSet Aggregates = <> Params = <> Left = 772 Top = 264 end object ClientDataSet41: TClientDataSet Aggregates = <> Params = <> Left = 956 Top = 272 end end