SQL-Abfrage nach Monat gruppieren

[marabu]

Nur ein wenig Kosmetik:

Delphi-Quellcode:

procedure TfrmUmsatz.FormActivate(Sender: TObject);
begin
  with ABSQuery1 do
  begin
    SQL.Text := 'SELECT EXTRACT(MONTH FROM datum) AS monat, '
              + 'SUM(gesamtnetto) AS sumGNetto FROM tblRechnung '
              + 'WHERE EXTRACT(YEAR FROM datum) = :jahr) '
              + 'GROUP BY monat ORDER BY monat DESC';
    Params.ParamValues['jahr'] := CurrentYear;
    Open;
  end;
end;

Vielleicht solltest du nochmal prüfen, ob das Ereignis OnActivate() der Form die optimale Stelle für die Query ist.

Gute Nacht

marabu