699 lines
18 KiB
Plaintext
699 lines
18 KiB
Plaintext
|
object frmBJGCl: TfrmBJGCl
|
||
|
|
Left = 109
|
||
|
|
Top = 115
|
||
|
|
Width = 1194
|
||
|
|
Height = 620
|
||
|
|
Caption = #21152#24037#32467#31639#21333
|
||
|
|
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 = 1178
|
||
|
|
AutoSize = True
|
||
|
|
ButtonHeight = 30
|
||
|
|
ButtonWidth = 89
|
||
|
|
Caption = 'ToolBar1'
|
||
|
|
Color = clSkyBlue
|
||
|
|
Flat = True
|
||
|
|
Images = LbQryPrint_DataLink.ThreeImgList
|
||
|
|
List = True
|
||
|
|
ParentColor = False
|
||
|
|
ShowCaptions = True
|
||
|
|
TabOrder = 0
|
||
|
|
object Tqry: TToolButton
|
||
|
|
Left = 0
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #26597#35810
|
||
|
|
ImageIndex = 2
|
||
|
|
OnClick = TqryClick
|
||
|
|
end
|
||
|
|
object Tprint: TToolButton
|
||
|
|
Left = 63
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #25171#21360
|
||
|
|
ImageIndex = 12
|
||
|
|
Visible = False
|
||
|
|
OnClick = TprintClick
|
||
|
|
end
|
||
|
|
object Txls: TToolButton
|
||
|
|
Left = 126
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #23548#20986'Excel'
|
||
|
|
ImageIndex = 75
|
||
|
|
OnClick = TxlsClick
|
||
|
|
end
|
||
|
|
object tclose: TToolButton
|
||
|
|
Left = 219
|
||
|
|
Top = 0
|
||
|
|
AutoSize = True
|
||
|
|
Caption = #20851#38381
|
||
|
|
ImageIndex = 55
|
||
|
|
OnClick = tcloseClick
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Panel1: TPanel
|
||
|
|
Left = 0
|
||
|
|
Top = 32
|
||
|
|
Width = 1178
|
||
|
|
Height = 45
|
||
|
|
Align = alTop
|
||
|
|
BevelInner = bvRaised
|
||
|
|
BevelOuter = bvLowered
|
||
|
|
Color = clSkyBlue
|
||
|
|
TabOrder = 1
|
||
|
|
object Label1: TLabel
|
||
|
|
Left = 32
|
||
|
|
Top = 16
|
||
|
|
Width = 52
|
||
|
|
Height = 12
|
||
|
|
Caption = #26816#39564#26085#26399
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label7: TLabel
|
||
|
|
Left = 592
|
||
|
|
Top = 64
|
||
|
|
Width = 52
|
||
|
|
Height = 12
|
||
|
|
Caption = #21592#24037#32534#21495
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label8: TLabel
|
||
|
|
Left = 772
|
||
|
|
Top = 64
|
||
|
|
Width = 52
|
||
|
|
Height = 12
|
||
|
|
Caption = #21592#24037#21517#31216
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label3: TLabel
|
||
|
|
Left = 672
|
||
|
|
Top = 156
|
||
|
|
Width = 48
|
||
|
|
Height = 12
|
||
|
|
Caption = #26816#39564#20154#21592
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label2: TLabel
|
||
|
|
Left = 236
|
||
|
|
Top = 16
|
||
|
|
Width = 6
|
||
|
|
Height = 12
|
||
|
|
Caption = '-'
|
||
|
|
end
|
||
|
|
object Label4: TLabel
|
||
|
|
Left = 480
|
||
|
|
Top = 16
|
||
|
|
Width = 26
|
||
|
|
Height = 12
|
||
|
|
Caption = #36710#38388
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object begdate: TDateTimePicker
|
||
|
|
Left = 84
|
||
|
|
Top = 12
|
||
|
|
Width = 90
|
||
|
|
Height = 20
|
||
|
|
Date = 40422.816672789360000000
|
||
|
|
Format = 'yyyy-MM-dd'
|
||
|
|
Time = 40422.816672789360000000
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object enddate: TDateTimePicker
|
||
|
|
Left = 252
|
||
|
|
Top = 12
|
||
|
|
Width = 95
|
||
|
|
Height = 20
|
||
|
|
Date = 40422.816949467590000000
|
||
|
|
Format = 'yyyy-MM-dd'
|
||
|
|
Time = 40422.816949467590000000
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
object userID: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 644
|
||
|
|
Top = 60
|
||
|
|
Width = 100
|
||
|
|
Height = 20
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 2
|
||
|
|
OnChange = userIDChange
|
||
|
|
end
|
||
|
|
object userName: TEdit
|
||
|
|
Tag = 2
|
||
|
|
Left = 828
|
||
|
|
Top = 60
|
||
|
|
Width = 100
|
||
|
|
Height = 20
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 3
|
||
|
|
OnChange = userIDChange
|
||
|
|
end
|
||
|
|
object ComboBox1: TComboBox
|
||
|
|
Left = 752
|
||
|
|
Top = 152
|
||
|
|
Width = 113
|
||
|
|
Height = 20
|
||
|
|
Style = csDropDownList
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
ItemHeight = 12
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 4
|
||
|
|
end
|
||
|
|
object begTime: TDateTimePicker
|
||
|
|
Left = 172
|
||
|
|
Top = 12
|
||
|
|
Width = 55
|
||
|
|
Height = 20
|
||
|
|
Date = 41583.333333333340000000
|
||
|
|
Format = 'HH:mm'
|
||
|
|
Time = 41583.333333333340000000
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
Kind = dtkTime
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 5
|
||
|
|
end
|
||
|
|
object endTime: TDateTimePicker
|
||
|
|
Left = 344
|
||
|
|
Top = 12
|
||
|
|
Width = 55
|
||
|
|
Height = 20
|
||
|
|
Date = 41583.333333333340000000
|
||
|
|
Format = 'HH:mm'
|
||
|
|
Time = 41583.333333333340000000
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = []
|
||
|
|
Kind = dtkTime
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 6
|
||
|
|
end
|
||
|
|
object dept: TComboBox
|
||
|
|
Left = 512
|
||
|
|
Top = 12
|
||
|
|
Width = 100
|
||
|
|
Height = 20
|
||
|
|
Style = csDropDownList
|
||
|
|
ItemHeight = 12
|
||
|
|
ItemIndex = 0
|
||
|
|
TabOrder = 7
|
||
|
|
OnChange = userIDChange
|
||
|
|
Items.Strings = (
|
||
|
|
''
|
||
|
|
#19968#36710#38388
|
||
|
|
#20108#36710#38388)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object cxGrid1: TcxGrid
|
||
|
|
Left = 0
|
||
|
|
Top = 77
|
||
|
|
Width = 1178
|
||
|
|
Height = 448
|
||
|
|
Align = alTop
|
||
|
|
TabOrder = 2
|
||
|
|
object TV1: TcxGridDBBandedTableView
|
||
|
|
NavigatorButtons.ConfirmDelete = False
|
||
|
|
DataController.DataSource = DataSource1
|
||
|
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
||
|
|
DataController.Summary.FooterSummaryItems = <
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column2
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column3
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column4
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column9
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column10
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column11
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column17
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column18
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column19
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column33
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column34
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Kind = skSum
|
||
|
|
Column = V1Column35
|
||
|
|
end>
|
||
|
|
DataController.Summary.SummaryGroups = <>
|
||
|
|
OptionsCustomize.ColumnFiltering = False
|
||
|
|
OptionsCustomize.ColumnMoving = False
|
||
|
|
OptionsData.Editing = False
|
||
|
|
OptionsView.GroupByBox = False
|
||
|
|
OptionsView.Indicator = True
|
||
|
|
Styles.Footer = LbQryPrint_DataLink.cxStyle_gridFoot
|
||
|
|
Styles.GroupByBox = LbQryPrint_DataLink.cxStyle_gridGroupBox
|
||
|
|
Styles.Header = LbQryPrint_DataLink.cxStyle_gridHead
|
||
|
|
Styles.BandHeader = LbQryPrint_DataLink.cxStyle_gridHead
|
||
|
|
Bands = <
|
||
|
|
item
|
||
|
|
Width = 213
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Caption = #30002
|
||
|
|
Width = 240
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Caption = #20057
|
||
|
|
Width = 240
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Caption = #19993
|
||
|
|
Width = 240
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Caption = #24635#21512#35745
|
||
|
|
Width = 260
|
||
|
|
end>
|
||
|
|
object V1FillTime: TcxGridDBBandedColumn
|
||
|
|
Caption = #36710#38388
|
||
|
|
DataBinding.FieldName = 'dept'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Width = 70
|
||
|
|
Position.BandIndex = 0
|
||
|
|
Position.ColIndex = 0
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1MachType: TcxGridDBBandedColumn
|
||
|
|
Caption = #31867#21035
|
||
|
|
DataBinding.FieldName = 'MachType'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 59
|
||
|
|
Position.BandIndex = 0
|
||
|
|
Position.ColIndex = 1
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column5: TcxGridDBBandedColumn
|
||
|
|
Caption = #21306#22495
|
||
|
|
DataBinding.FieldName = 'machFlag'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Width = 84
|
||
|
|
Position.BandIndex = 0
|
||
|
|
Position.ColIndex = 2
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column2: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'
|
||
|
|
DataBinding.FieldName = 'X_A_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 40
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 1
|
||
|
|
Position.ColIndex = 0
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column3: TcxGridDBBandedColumn
|
||
|
|
Caption = 'B'
|
||
|
|
DataBinding.FieldName = 'X_B_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 37
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 1
|
||
|
|
Position.ColIndex = 1
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column4: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A+B'
|
||
|
|
DataBinding.FieldName = 'X_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 42
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 1
|
||
|
|
Position.ColIndex = 2
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column1: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'#32423#29575
|
||
|
|
DataBinding.FieldName = 'X_A_Qty_rate'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 41
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 1
|
||
|
|
Position.ColIndex = 3
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column9: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'
|
||
|
|
DataBinding.FieldName = 'Y_A_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 2
|
||
|
|
Position.ColIndex = 0
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column10: TcxGridDBBandedColumn
|
||
|
|
Caption = 'B'
|
||
|
|
DataBinding.FieldName = 'Y_B_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 2
|
||
|
|
Position.ColIndex = 1
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column11: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A+B'
|
||
|
|
DataBinding.FieldName = 'Y_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 2
|
||
|
|
Position.ColIndex = 2
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column12: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'#32423#29575
|
||
|
|
DataBinding.FieldName = 'Y_A_Qty_rate'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 2
|
||
|
|
Position.ColIndex = 3
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column17: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'
|
||
|
|
DataBinding.FieldName = 'Z_A_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 40
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 3
|
||
|
|
Position.ColIndex = 0
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column18: TcxGridDBBandedColumn
|
||
|
|
Caption = 'B'
|
||
|
|
DataBinding.FieldName = 'Z_B_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 26
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 3
|
||
|
|
Position.ColIndex = 1
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column19: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A+B'
|
||
|
|
DataBinding.FieldName = 'Z_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 54
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 3
|
||
|
|
Position.ColIndex = 2
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column20: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'#32423#29575
|
||
|
|
DataBinding.FieldName = 'Z_A_Qty_rate'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
Width = 40
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 3
|
||
|
|
Position.ColIndex = 3
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column33: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'
|
||
|
|
DataBinding.FieldName = 'A_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 4
|
||
|
|
Position.ColIndex = 0
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column34: TcxGridDBBandedColumn
|
||
|
|
Caption = 'B'
|
||
|
|
DataBinding.FieldName = 'B_Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 4
|
||
|
|
Position.ColIndex = 1
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column35: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A+B'
|
||
|
|
DataBinding.FieldName = 'Qty'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 4
|
||
|
|
Position.ColIndex = 2
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1Column36: TcxGridDBBandedColumn
|
||
|
|
Caption = 'A'#32423#29575
|
||
|
|
DataBinding.FieldName = 'A_Qty_rate'
|
||
|
|
HeaderAlignmentHorz = taCenter
|
||
|
|
Options.CellMerging = True
|
||
|
|
OnCompareRowValuesForCellMerging = V1Column2CompareRowValuesForCellMerging
|
||
|
|
Position.BandIndex = 4
|
||
|
|
Position.ColIndex = 3
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
object V1MachOrder: TcxGridDBBandedColumn
|
||
|
|
DataBinding.FieldName = 'MachOrder'
|
||
|
|
Visible = False
|
||
|
|
Hidden = True
|
||
|
|
Options.CellMerging = True
|
||
|
|
Position.BandIndex = 0
|
||
|
|
Position.ColIndex = 3
|
||
|
|
Position.RowIndex = 0
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object cxGrid1Level1: TcxGridLevel
|
||
|
|
GridView = TV1
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object Panetime: TPanel
|
||
|
|
Left = 318
|
||
|
|
Top = 164
|
||
|
|
Width = 185
|
||
|
|
Height = 41
|
||
|
|
BevelInner = bvRaised
|
||
|
|
BevelOuter = bvLowered
|
||
|
|
Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31561#24453'...'
|
||
|
|
Font.Charset = GB2312_CHARSET
|
||
|
|
Font.Color = clBlue
|
||
|
|
Font.Height = -12
|
||
|
|
Font.Name = #23435#20307
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
TabOrder = 3
|
||
|
|
Visible = False
|
||
|
|
end
|
||
|
|
object ADOQueryTmp: TADOQuery
|
||
|
|
AutoCalcFields = False
|
||
|
|
Connection = LbQryPrint_DataLink.ADOLink
|
||
|
|
CommandTimeout = 600
|
||
|
|
Parameters = <>
|
||
|
|
Left = 652
|
||
|
|
Top = 260
|
||
|
|
end
|
||
|
|
object DataSource1: TDataSource
|
||
|
|
DataSet = ADOQueryTmp
|
||
|
|
Left = 640
|
||
|
|
Top = 220
|
||
|
|
end
|
||
|
|
object cxGridPopupMenu1: TcxGridPopupMenu
|
||
|
|
Grid = cxGrid1
|
||
|
|
PopupMenus = <>
|
||
|
|
Left = 584
|
||
|
|
Top = 132
|
||
|
|
end
|
||
|
|
object RMDBDataSet1: TRMDBDataSet
|
||
|
|
Visible = True
|
||
|
|
DataSet = ADOQueryTmp
|
||
|
|
Left = 464
|
||
|
|
Top = 184
|
||
|
|
end
|
||
|
|
object RMGridReport1: TRMGridReport
|
||
|
|
ThreadPrepareReport = True
|
||
|
|
InitialZoom = pzDefault
|
||
|
|
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
|
||
|
|
DefaultCollate = False
|
||
|
|
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
|
||
|
|
PreviewOptions.RulerUnit = rmutScreenPixels
|
||
|
|
PreviewOptions.RulerVisible = False
|
||
|
|
PreviewOptions.DrawBorder = False
|
||
|
|
PreviewOptions.BorderPen.Color = clGray
|
||
|
|
PreviewOptions.BorderPen.Style = psDash
|
||
|
|
CompressLevel = rmzcFastest
|
||
|
|
CompressThread = False
|
||
|
|
LaterBuildEvents = True
|
||
|
|
OnlyOwnerDataSet = False
|
||
|
|
Left = 624
|
||
|
|
Top = 180
|
||
|
|
ReportData = {}
|
||
|
|
end
|
||
|
|
object RMXLSExport1: TRMXLSExport
|
||
|
|
ShowAfterExport = True
|
||
|
|
ExportPrecision = 1
|
||
|
|
PagesOfSheet = 1
|
||
|
|
ExportImages = True
|
||
|
|
ExportFrames = True
|
||
|
|
ExportImageFormat = ifBMP
|
||
|
|
JPEGQuality = 0
|
||
|
|
ScaleX = 1.000000000000000000
|
||
|
|
ScaleY = 1.000000000000000000
|
||
|
|
CompressFile = False
|
||
|
|
Left = 684
|
||
|
|
Top = 164
|
||
|
|
end
|
||
|
|
end
|