Addieren aller Zeilen eins Datenfeldes

[Jens Schumann]

Hallo,
so sollte es klappen:

Delphi-Quellcode:

...
var
   Summe : Integer;
...

with Querry1 do begin
     Active := false;
     SQL.Clear;
     SQL.Add('select Sum(Datenbankfeld3) AS Summe');
     SQL.Add('from "Datenbank.db"');
     Active:=True;
     Summe:=FieldByName('Summe').AsInteger;
     Active := false;
     TblAuswertung.Refresh;
end;