D7gmYongjin/BI(BIView.dll)/U_PBAllTop.dfm

966 lines
26 KiB
Plaintext
Raw Normal View History

2026-03-04 09:51:44 +08:00
object frmPBAllTop: TfrmPBAllTop
Left = 45
Top = 53
Width = 1283
Height = 669
Caption = #21069#20108#21313#22823#22383#24067#25490#34892#27036
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1267
Height = 31
ButtonHeight = 30
ButtonWidth = 59
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 = 284
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label1: TLabel
Left = 307
Top = 9
Width = 24
Height = 12
Caption = #21697#21517
Visible = False
end
object Label5: TLabel
Left = 8
Top = 9
Width = 48
Height = 12
Caption = #26597#35810#26085#26399
end
object Label6: TLabel
Left = 164
Top = 9
Width = 12
Height = 12
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 = 58
Top = 5
Width = 102
Height = 20
Date = 40675.000000000000000000
Time = 40675.000000000000000000
TabOrder = 1
end
object EndDate: TDateTimePicker
Left = 178
Top = 5
Width = 102
Height = 20
Date = 40675.000000000000000000
Time = 40675.000000000000000000
TabOrder = 2
end
end
object TBRafresh: TToolButton
Left = 284
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 347
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
Visible = False
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 410
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel2: TPanel
Left = 0
Top = 31
Width = 1267
Height = 425
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Panel3: TPanel
Left = 2
Top = 2
Width = 282
Height = 421
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 0
object cxGrid1: TcxGrid
Left = 2
Top = 21
Width = 278
Height = 379
Align = alClient
TabOrder = 0
object Tv1: TcxGridDBTableView
OnDblClick = Tv1DblClick
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.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'
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 = 400
Width = 278
Height = 19
Align = alBottom
BevelOuter = bvNone
Caption = #39564#24067#24635#25968#37327
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object SH1: TPanel
Left = 2
Top = 2
Width = 278
Height = 19
Align = alTop
BevelOuter = bvNone
Caption = #39564#24067'Top20'#25490#34892#27036
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
object Panel6: TPanel
Left = 935
Top = 2
Width = 246
Height = 421
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 1
object cxGrid2: TcxGrid
Left = 2
Top = 21
Width = 242
Height = 379
Align = alClient
TabOrder = 0
object Tv2: TcxGridDBTableView
OnDblClick = Tv2DblClick
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.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 = #26426#21488
DataBinding.FieldName = 'SPName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 70
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #21305#25968
DataBinding.FieldName = 'PS'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 62
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 = 400
Width = 242
Height = 19
Align = alBottom
BevelOuter = bvNone
Caption = #26426#21488#29983#20135#24635#25968#37327
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object KK1: TPanel
Left = 2
Top = 2
Width = 242
Height = 19
Align = alTop
BevelOuter = bvNone
Caption = #26426#21488'Top20'#25490#34892#27036
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
object Panel8: TPanel
Left = 565
Top = 2
Width = 370
Height = 421
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 2
object cxGrid3: TcxGrid
Left = 2
Top = 21
Width = 366
Height = 379
Align = alClient
TabOrder = 0
object Tv3: TcxGridDBTableView
OnDblClick = Tv3DblClick
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.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 v3Column1: TcxGridDBColumn
Caption = #25209#21495
DataBinding.FieldName = 'BatchNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 89
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 = 41
end
end
object cxGridLevel3: TcxGridLevel
GridView = Tv3
end
end
object DJ2: TPanel
Left = 2
Top = 400
Width = 366
Height = 19
Align = alBottom
BevelOuter = bvNone
Caption = #25209#21495#24635#25968#37327
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object DJ1: TPanel
Left = 2
Top = 2
Width = 366
Height = 19
Align = alTop
BevelOuter = bvNone
Caption = #25209#21495'Top20'#25490#34892#27036
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
object Panel9: TPanel
Left = 284
Top = 2
Width = 281
Height = 421
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 3
object cxGrid4: TcxGrid
Left = 2
Top = 21
Width = 277
Height = 379
Align = alClient
TabOrder = 0
object Tv4: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
NavigatorButtons.Delete.Enabled = False
NavigatorButtons.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 = 400
Width = 277
Height = 19
Align = alBottom
BevelOuter = bvNone
Caption = #21457#36135#24635#25968#37327
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object CH1: TPanel
Left = 2
Top = 2
Width = 277
Height = 19
Align = alTop
BevelOuter = bvNone
Caption = #21457#36135'Top20'#25490#34892#27036
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
end
object Panel4: TPanel
Left = 0
Top = 456
Width = 1267
Height = 175
Align = alBottom
Caption = 'Panel4'
Color = clSkyBlue
TabOrder = 2
object Panel5: TPanel
Left = 1
Top = 1
Width = 283
Height = 173
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object DBChart1: TDBChart
Left = 2
Top = 2
Width = 279
Height = 169
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 = 936
Top = 1
Width = 246
Height = 173
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object DBChart2: TDBChart
Left = 2
Top = 2
Width = 242
Height = 169
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 = 565
Top = 1
Width = 371
Height = 173
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object DBChart3: TDBChart
Left = 2
Top = 2
Width = 367
Height = 169
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 = 284
Top = 1
Width = 281
Height = 173
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object DBChart4: TDBChart
Left = 2
Top = 2
Width = 277
Height = 169
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 = 480
Top = 208
Width = 249
Height = 41
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 = -12
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 = 84
Top = 304
end
object ClientDataSet21: TClientDataSet
Aggregates = <>
Params = <>
Left = 436
Top = 288
end
object ClientDataSet31: TClientDataSet
Aggregates = <>
Params = <>
Left = 796
Top = 280
end
object ClientDataSet41: TClientDataSet
Aggregates = <>
Params = <>
Left = 996
Top = 304
end
end