git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@29 05c56307-c608-d34a-929d-697000501d7a
43 lines
1.1 KiB
ObjectPascal
43 lines
1.1 KiB
ObjectPascal
unit EditorsInPlaceDemoMain;
|
|
|
|
{$I ..\cxVer.inc}
|
|
|
|
interface
|
|
|
|
uses
|
|
Windows, Messages, {$IFDEF DELPHI6} Variants, {$ENDIF} Forms, Dialogs,
|
|
SysUtils, Menus, StdCtrls, Controls, cxLookAndFeels, DemoBasicMain,
|
|
cxControls, cxCustomPivotGrid, cxDBPivotGrid, DemoBasicDM, cxStyles,
|
|
cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData,
|
|
Classes, cxClasses, cxProgressBar;
|
|
|
|
type
|
|
TfrmEditorsInPlace = class(TfrmDemoBaisicMain)
|
|
DBPivotGrid: TcxDBPivotGrid;
|
|
pgfPurchaseDate: TcxDBPivotGridField;
|
|
pgfPaymentType: TcxDBPivotGridField;
|
|
pgfQuantity: TcxDBPivotGridField;
|
|
pgfCarName: TcxDBPivotGridField;
|
|
pgfUnitPrice: TcxDBPivotGridField;
|
|
pgfCompanyName: TcxDBPivotGridField;
|
|
pgfPaymentAmount: TcxDBPivotGridField;
|
|
protected
|
|
function GetPivotGrid: TcxCustomPivotGrid; override;
|
|
end;
|
|
|
|
var
|
|
frmEditorsInPlace: TfrmEditorsInPlace;
|
|
|
|
implementation
|
|
|
|
{$R *.dfm}
|
|
|
|
{ TfrmEditorsInPlace }
|
|
|
|
function TfrmEditorsInPlace.GetPivotGrid: TcxCustomPivotGrid;
|
|
begin
|
|
Result := DBPivotGrid;
|
|
end;
|
|
|
|
end.
|