Hey Leute,
danke an alle, ich habe es nun so eingebaut und läuft sehr gut!!
Delphi-Quellcode:
procedure TfrmUmsatz.FormActivate(Sender: TObject);
begin
cboJahr.Text := FormatDateTime('yyyy',date);
with ABSQuery1 do
begin
ABSQuery1.Close;
ABSQuery1.SQL.Text := 'SELECT EXTRACT(MONTH FROM datum) AS monat, SUM(gesamtnetto)AS sumGNetto FROM tblRechnung WHERE (Datum Like "%"+:Jahr) GROUP BY monat ORDER BY monat DESC';
ABSQuery1.ParamByName('Jahr').asString := cboJahr.Text;
ABSQuery1.Open;
end
end;
mfg Norbert