david
08e42642b8
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@21 05c56307-c608-d34a-929d-697000501d7a
98 lines
2.7 KiB
Plaintext
98 lines
2.7 KiB
Plaintext
inherited frmOrderReport: TfrmOrderReport
|
|
Left = 32
|
|
Top = 83
|
|
Caption = 'PivotGrid - Order Reports'
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
inherited lbDescrip: TLabel
|
|
Caption =
|
|
'This demo allows you to display summarized data on car sales by ' +
|
|
'filtering source data, organizing the layout via drag-and-drop o' +
|
|
'perations and customizing the appearance settings of visual elem' +
|
|
'ents using a set of options.'
|
|
end
|
|
object DBPivotGrid: TcxDBPivotGrid [1]
|
|
Left = 0
|
|
Top = 32
|
|
Width = 807
|
|
Height = 511
|
|
Align = alClient
|
|
DataSource = dmOrders.dsOrders
|
|
GroupHeaderImages = dmOrders.PaymentTypeImages
|
|
Groups = <>
|
|
TabOrder = 0
|
|
TabStop = True
|
|
object pgfPurchaseDate: TcxDBPivotGridField
|
|
AreaIndex = 1
|
|
DataBinding.FieldName = 'PurchaseDate'
|
|
GroupInterval = giDateMonth
|
|
Visible = True
|
|
end
|
|
object pgfPaymentType: TcxDBPivotGridField
|
|
Area = faColumn
|
|
AreaIndex = 0
|
|
DataBinding.FieldName = 'PaymentType'
|
|
Visible = True
|
|
OnGetGroupImageIndex = pgfPaymentTypeGetGroupImageIndex
|
|
end
|
|
object pgfQuantity: TcxDBPivotGridField
|
|
Area = faData
|
|
AreaIndex = 0
|
|
DataBinding.FieldName = 'Quantity'
|
|
DisplayFormat = '0'
|
|
Visible = True
|
|
Width = 49
|
|
end
|
|
object pgfCarName: TcxDBPivotGridField
|
|
Area = faRow
|
|
AreaIndex = 1
|
|
DataBinding.FieldName = 'Car Name'
|
|
Visible = True
|
|
Width = 77
|
|
end
|
|
object pgfUnitPrice: TcxDBPivotGridField
|
|
AreaIndex = 0
|
|
DataBinding.FieldName = 'Unit Price'
|
|
Visible = True
|
|
end
|
|
object pgfCompanyName: TcxDBPivotGridField
|
|
Area = faRow
|
|
AreaIndex = 0
|
|
DataBinding.FieldName = 'Company Name'
|
|
Visible = True
|
|
Width = 131
|
|
end
|
|
object pgfPaymentAmount: TcxDBPivotGridField
|
|
Area = faData
|
|
AreaIndex = 1
|
|
IsCaptionAssigned = True
|
|
Caption = 'Payment Amount'
|
|
DataBinding.FieldName = 'PaymentAmount'
|
|
Visible = True
|
|
Width = 90
|
|
end
|
|
end
|
|
inherited mmMain: TMainMenu
|
|
inherited miOptions: TMenuItem
|
|
inherited miElementsVisibility: TMenuItem
|
|
inherited miShowColumnFields: TMenuItem
|
|
Caption = 'Show Column Fields'
|
|
end
|
|
inherited miShowDataFields: TMenuItem
|
|
Caption = 'Show Data Fields'
|
|
end
|
|
inherited miShowFilterFields: TMenuItem
|
|
Caption = 'Show Filter Fields'
|
|
end
|
|
inherited miShowFilterSeparator: TMenuItem
|
|
Caption = 'Show Filter Separator'
|
|
end
|
|
inherited miShowRowFields: TMenuItem
|
|
Caption = 'Show Row Fields'
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|