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

792 lines
23 KiB
Plaintext
Raw Normal View History

2026-03-04 09:51:44 +08:00
object frmDCTimeZhou: TfrmDCTimeZhou
Left = 81
Top = 32
Width = 1666
Height = 971
Caption = #22278#26426#20135#37327#26597#35810
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 = 1648
Height = 31
ButtonHeight = 30
ButtonWidth = 105
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 = 328
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label5: TLabel
Left = 8
Top = 9
Width = 60
Height = 15
Caption = #26597#35810#26085#26399
end
object Label6: TLabel
Left = 188
Top = 9
Width = 15
Height = 15
Caption = #33267
end
object BegDate: TDateTimePicker
Left = 71
Top = 5
Width = 113
Height = 23
Date = 40675.000000000000000000
Time = 40675.000000000000000000
TabOrder = 0
end
object EndDate: TDateTimePicker
Left = 209
Top = 5
Width = 111
Height = 23
Date = 40675.000000000000000000
Time = 40675.000000000000000000
TabOrder = 1
end
end
object TBRafresh: TToolButton
Left = 328
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = TBRafreshClick
end
object ToolButton2: TToolButton
Left = 397
Top = 0
AutoSize = True
Caption = #36807#28388
ImageIndex = 20
Visible = False
OnClick = ToolButton2Click
end
object ToolButton1: TToolButton
Left = 466
Top = 0
Caption = #23548#20986'Excel'
ImageIndex = 72
OnClick = ToolButton1Click
end
object ComboBox1: TComboBox
Left = 571
Top = 3
Width = 196
Height = 23
Style = csDropDownList
ItemHeight = 15
TabOrder = 1
Items.Strings = (
#26426#21488#20135#37327#27719#24635
#25377#36710#24037#20135#37327#27719#24635
#21697#21517#20135#37327#27719#24635
#26085#26399#20135#37327#27719#24635)
end
object TBClose: TToolButton
Left = 767
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel2: TPanel
Left = 0
Top = 31
Width = 1648
Height = 893
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Panel3: TPanel
Left = 2
Top = 2
Width = 453
Height = 889
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 0
object cxGrid1: TcxGrid
Left = 2
Top = 25
Width = 449
Height = 862
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
Column = v2Column7
end
item
Kind = skSum
Column = Tv1Column1
end
item
Kind = skSum
Column = Tv1Column2
end
item
Kind = skSum
Column = Tv1Column3
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_BIView.FontBlue
Styles.Header = DataLink_BIView.handBlack
object v1Column1: TcxGridDBColumn
Caption = #24207
DataBinding.FieldName = 'XH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 33
end
object v2Column12: TcxGridDBColumn
Caption = #26426#21488
DataBinding.FieldName = 'CarNo'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 48
end
object v2Column7: TcxGridDBColumn
Caption = #36716#25968
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 62
end
object Tv1Column4: TcxGridDBColumn
Caption = #26085#22343#24037#36164
DataBinding.FieldName = 'AvgDayMoney'
HeaderAlignmentHorz = taCenter
Width = 64
end
object Tv1Column3: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'HZMoney'
OnCustomDrawCell = Tv1Column3CustomDrawCell
HeaderAlignmentHorz = taCenter
Width = 68
end
object Tv1Column1: TcxGridDBColumn
Caption = #24453#30830#35748
DataBinding.FieldName = 'WQRMoney'
HeaderAlignmentHorz = taCenter
Width = 45
end
object Tv1Column2: TcxGridDBColumn
Caption = #24050#30830#35748
DataBinding.FieldName = 'QRMoney'
HeaderAlignmentHorz = taCenter
Width = 47
end
object v1Column4: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'AvgPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 51
end
object Tv1Column5: TcxGridDBColumn
DataBinding.FieldName = 'Qty0'
Visible = False
Width = 20
end
object Tv1Column6: TcxGridDBColumn
DataBinding.FieldName = 'Qty1'
Visible = False
Width = 20
end
object Tv1Column7: TcxGridDBColumn
DataBinding.FieldName = 'Qty11'
Visible = False
Width = 20
end
object Tv1Column8: TcxGridDBColumn
DataBinding.FieldName = 'Qty21'
Visible = False
Width = 20
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv1
end
end
object SH1: TPanel
Left = 2
Top = 2
Width = 449
Height = 23
Align = alTop
BevelOuter = bvNone
Caption = #26426#21488#20135#37327#27719#24635
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
end
object Panel4: TPanel
Left = 947
Top = 2
Width = 699
Height = 889
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 1
object Panel5: TPanel
Left = 2
Top = 2
Width = 695
Height = 23
Align = alTop
BevelOuter = bvNone
Caption = #26085#26399#20135#37327#27719#24635
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object cxGrid5: TcxGrid
Left = 2
Top = 25
Width = 695
Height = 862
Align = alClient
TabOrder = 1
object Tv5: TcxGridDBTableView
OnDblClick = Tv5DblClick
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
OnCellClick = Tv1CellClick
DataController.DataSource = DataSource5
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn17
end
item
Kind = skSum
Column = cxGridDBColumn19
end
item
Kind = skSum
Column = cxGridDBColumn20
end
item
Kind = skSum
Column = cxGridDBColumn21
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_BIView.FontBlue
Styles.Header = DataLink_BIView.handBlack
object cxGridDBColumn15: TcxGridDBColumn
Caption = #24207
DataBinding.FieldName = 'XH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 33
end
object cxGridDBColumn16: TcxGridDBColumn
Caption = #26085#26399
DataBinding.FieldName = 'JSDate'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 93
end
object cxGridDBColumn17: TcxGridDBColumn
Caption = #36716#25968
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 68
end
object Tv5Column1: TcxGridDBColumn
Caption = #26085#22343#24037#36164
DataBinding.FieldName = 'AvgDayMoney'
Width = 59
end
object cxGridDBColumn21: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'HZMoney'
HeaderAlignmentHorz = taCenter
Width = 68
end
object cxGridDBColumn19: TcxGridDBColumn
Caption = #24453#30830#35748
DataBinding.FieldName = 'WQRMoney'
HeaderAlignmentHorz = taCenter
Width = 49
end
object cxGridDBColumn20: TcxGridDBColumn
Caption = #24050#30830#35748
DataBinding.FieldName = 'QRMoney'
HeaderAlignmentHorz = taCenter
Width = 45
end
object cxGridDBColumn18: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'AvgPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 53
end
end
object cxGridLevel4: TcxGridLevel
GridView = Tv5
end
end
end
object Panel6: TPanel
Left = 455
Top = 2
Width = 492
Height = 889
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 2
object Panel7: TPanel
Left = 2
Top = 613
Width = 488
Height = 23
Align = alTop
BevelOuter = bvNone
Caption = #21697#21517#20135#37327#27719#24635
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object cxGrid3: TcxGrid
Left = 2
Top = 25
Width = 488
Height = 588
Align = alTop
TabOrder = 1
object Tv3: TcxGridDBTableView
OnDblClick = Tv3DblClick
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
OnCellClick = Tv1CellClick
DataController.DataSource = DataSource3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn6
end
item
Kind = skSum
Column = cxGridDBColumn8
end
item
Kind = skSum
Column = cxGridDBColumn9
end
item
Kind = skSum
Column = cxGridDBColumn10
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_BIView.FontBlue
Styles.Header = DataLink_BIView.handBlack
object cxGridDBColumn1: TcxGridDBColumn
Caption = #24207
DataBinding.FieldName = 'XH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 33
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #25377#36710#24037
DataBinding.FieldName = 'Worker'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 66
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #36716#25968
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 64
end
object Tv3Column1: TcxGridDBColumn
Caption = #26085#22343#24037#36164
DataBinding.FieldName = 'AvgDayMoney'
HeaderAlignmentHorz = taCenter
Width = 59
end
object cxGridDBColumn10: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'HZMoney'
OnCustomDrawCell = cxGridDBColumn10CustomDrawCell
HeaderAlignmentHorz = taCenter
Width = 66
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #24453#30830#35748
DataBinding.FieldName = 'WQRMoney'
HeaderAlignmentHorz = taCenter
Width = 49
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #24050#30830#35748
DataBinding.FieldName = 'QRMoney'
HeaderAlignmentHorz = taCenter
Width = 47
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'AvgPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object Tv3Column2: TcxGridDBColumn
DataBinding.FieldName = 'Qty0'
Visible = False
Width = 20
end
object Tv3Column3: TcxGridDBColumn
DataBinding.FieldName = 'Qty1'
Visible = False
Width = 20
end
object Tv3Column4: TcxGridDBColumn
DataBinding.FieldName = 'Qty11'
Visible = False
Width = 20
end
object Tv3Column5: TcxGridDBColumn
DataBinding.FieldName = 'Qty21'
Visible = False
Width = 20
end
end
object cxGridLevel3: TcxGridLevel
GridView = Tv3
end
end
object Panel8: TPanel
Left = 2
Top = 2
Width = 488
Height = 23
Align = alTop
BevelOuter = bvNone
Caption = #25377#36710#24037#20135#37327#27719#24635
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object cxGrid2: TcxGrid
Left = 2
Top = 636
Width = 488
Height = 251
Align = alClient
TabOrder = 3
object Tv2: TcxGridDBTableView
OnDblClick = Tv2DblClick
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
OnCellClick = Tv1CellClick
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn4
end
item
Kind = skSum
Column = cxGridDBColumn12
end
item
Kind = skSum
Column = cxGridDBColumn13
end
item
Kind = skSum
Column = cxGridDBColumn14
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_BIView.FontBlue
Styles.Header = DataLink_BIView.handBlack
object cxGridDBColumn2: TcxGridDBColumn
Caption = #24207
DataBinding.FieldName = 'XH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 33
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #21697#21517
DataBinding.FieldName = 'C_CodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 74
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #36716#25968
DataBinding.FieldName = 'Qty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 75
end
object Tv2Column1: TcxGridDBColumn
Caption = #26085#22343#24037#36164
DataBinding.FieldName = 'AvgDayMoney'
HeaderAlignmentHorz = taCenter
Width = 60
end
object cxGridDBColumn14: TcxGridDBColumn
Caption = #37329#39069
DataBinding.FieldName = 'HZMoney'
HeaderAlignmentHorz = taCenter
Width = 62
end
object cxGridDBColumn12: TcxGridDBColumn
Caption = #24453#30830#35748
DataBinding.FieldName = 'WQRMoney'
HeaderAlignmentHorz = taCenter
Width = 49
end
object cxGridDBColumn13: TcxGridDBColumn
Caption = #24050#30830#35748
DataBinding.FieldName = 'QRMoney'
HeaderAlignmentHorz = taCenter
Width = 45
end
object cxGridDBColumn11: TcxGridDBColumn
Caption = #21333#20215
DataBinding.FieldName = 'AvgPrice'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 51
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv2
end
end
end
end
object Panel10: TPanel
Left = 618
Top = 270
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 = 2
Visible = False
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_BIView.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 893
Top = 97
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_BIView.ADOLink
Parameters = <>
Left = 825
Top = 125
end
object ADOQueryMain: TADOQuery
Connection = DataLink_BIView.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 925
Top = 113
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid1
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 DataSource3: TDataSource
DataSet = ClientDataSet3
Left = 647
Top = 399
end
object ClientDataSet3: TClientDataSet
Aggregates = <>
Params = <>
Left = 684
Top = 404
end
object DataSource2: TDataSource
DataSet = ClientDataSet2
Left = 939
Top = 639
end
object ClientDataSet2: TClientDataSet
Aggregates = <>
Params = <>
Left = 904
Top = 636
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 616
Top = 396
end
object cxGridPopupMenu3: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 868
Top = 636
end
object cxGridPopupMenu5: TcxGridPopupMenu
Grid = cxGrid5
PopupMenus = <>
Left = 1192
Top = 448
end
object DataSource5: TDataSource
DataSet = ClientDataSet5
Left = 1223
Top = 451
end
object ClientDataSet5: TClientDataSet
Aggregates = <>
Params = <>
Left = 1260
Top = 456
end
end