DevExpress PivotGridで合計を表示するにはどうすればよいですか？

Question

DevExpress PivotGridで、合計と最後の合計の合計を表示する必要があります。
例：
は、この値を取る： 月：25
4月：10
月：この中に結果の30

：

私はこれに私のPivotGridを設定するにはどうすればよい

March April May 
25  35  65 

？

ありがとうございます。

Answer 1

フィールドのRunningTotalプロパティをtrueに設定する必要があります。

Answer 2

あなたは、フィールドのOnCalculateCustomSummaryイベントにこのコードを追加する必要があります。

から抽出

procedure TForm1.cxDBPivotGrid1Field2GetDisplayText(Sender: TcxPivotGridField; ACell: TcxPivotGridDataCellViewInfo; var AText: string); 
begin 
    inherited; 
    AText := VarToStr(ACell.CellSummary.Custom) 
end; 

：

フィールドのOnGetDisplayTextイベントで

procedure TMyForm.cxDBPivotGrid1Field2CalculateCustomSummary(Sender: TcxPivotGridField; ASummary: TcxPivotGridCrossCellSummary); 
var 
    AColumn: TcxPivotGridGroupItem; 
    APrevCrossCell: TcxPivotGridCrossCell; 
    APrevCrossCellSummary: TcxPivotGridCrossCellSummary; 
begin 
    inherited; 
    AColumn := ASummary.Owner.Column; 
    if (AColumn.Level = -1) then 
    // column grand totals 
    ASummary.Custom := ASummary.Sum 
    else begin 
    // all cells, except for column grand totals 
    // getting a custom summary calculated for the previous grouping value 
    if AColumn.PrevSibling <> nil then begin 
     APrevCrossCell  := AColumn.PrevSibling.GetCellByCrossItem(ASummary.Owner.Row); 
     APrevCrossCellSummary := APrevCrossCell.SummaryCells[Sender.SummaryIndex]; 
     ASummary.Custom  := VarToDouble(APrevCrossCellSummary.Custom) + VarToDouble(ASummary.Sum); 
    end 
    else 
     ASummary.Custom  := ASummary.Sum; 
    end; 
end; 

そしてこの http://www.devexpress.com/Support/Center/p/Q90021.aspx