Einzelnen Beitrag anzeigen

Ron67

Registriert seit: 10. Sep 2018
Ort: Großraum Nürnberg
13 Beiträge
 
Delphi 12 Athens
 
#1

cxGrid - einige Spalten mit Summe anzeigen

  Alt 12. Sep 2019, 12:04
Datenbank: mysql • Version: 10.1.26 • Zugriff über: fireDAC
Moin,
Meine Frage scheint trivial zu sein. Aber ich kriege es nicht hin.

Ich habe ein cxGrid, welches mit der Query verbunden ist. Die Spaltenanzahl und die Spaltennamen variieren, die Query wird über Comboboxen und Checkboxen zusammen gesetzt.
Z.B:
Monat Werte2018 Werte2019
1 23 45
2 14 12
3 89 38
...

Code:
procedure TfrmChecks.DoTheSelect(ASelect : String);
  var
  I : Integer;
  LColumn : TcxGridDBColumn;
  LGridBreite : Integer;
begin
  qrySelect.Close; // Bleibt offen, bis Neue kommt
  qrySelect.sql.Clear;
  qrySelect.sql.Add(ASelect);
  qrySelect.Open();
  tvChecks.DataController.BeginUpdate;
  tvChecks.ClearItems;
  for I := 0 to qrySelect.FieldCount-1 do
  begin
    LColumn := tvChecks.CreateColumn;
    LColumn.DataBinding.FieldName := qrySelect.Fields[I].FieldName;
    LColumn.Name := qrySelect.Fields[I].FieldName;
    LColumn.Caption := qrySelect.Fields[I].FieldName;
    LColumn.Options.Editing := False;
    // Merke den Spaltennamen
    ColumnNames.Add(LColumn.Name);
  end;
  tvChecks.DataController.EndUpdate;
  tvChecks.DataController.RefreshExternalData;
  tvChecks.ApplyBestFit(); // Spaltenbreite optimieren(verkleinern)
  GridRowCount := tvChecks.DataController.RecordCount;
end;
Ich möchte nun in den Spalten mit den Werten die Summe darunter anzeigen. Und am liebsten auch unter der Spalte "Monat" den Text "Summe:".

Geht das mit
wasBraucheIchHier := LColumn.Summary.Create(was muß hier rein?)
Und wie genau?
  Mit Zitat antworten Zitat