delphi - cxgrid フッター形式 - HH:MM 形式の合計時間

Question

cxgrid では、フッターで時間を合計しています (問題のフィールドは Time フィールドです)。プロパティを TimeEdit に変更し、時間表示形式を「tfHourMin」に変更しました。ただし、基になるフッターにはできません。hh:mm:ss を表示し続けます。フッターも「tfHourMin」形式で表示する方法はありますか???

編集：これを行うと、「タイプ（Null）のバリアントをタイプ（Double）に変換できませんでした」というエラーが表示されます

procedure TForm1.cxGrid1DBTableView1TcxGridDBDataControllerTcxDataSummaryFooterSummaryItems1GetText(
  Sender: TcxDataSummaryItem; const AValue: Variant; AIsFooter: Boolean;
  var AText: string);
begin
 AText := FormatDateTime('hh:mm', AValue);
end;

Answer 1

サマリー アイテムのOnGetTextイベントを使用して、表示する独自のテキストを提供できます。

procedure TForm1.H_FormatSummaryItem(Sender: TcxDataSummaryItem; const AValue: Variant; AIsFooter: Boolean; var AText: string);
begin
  if(TVarData(AValue).VType in [varNull, varEmpty])then AText := ''
  else begin
     if((Sender as TcxGridTableSummaryItem).Kind = skSum)then begin
        AText := FormatDateTime('hh:nn', AValue);
     end;
  end;
end;