Select Sum(Fieldname) From Table

[Amenovis]

Bitte was mach ich falsch????

Ich hänge da ganz ehrlich schon 2 Tage dran je 8 Std.

Ich hab Schleifen Probiert bis ich auf Sum(Feld) von Tabelle stiess.

Und auch Im SQL selbst macht er es Ohne Schwierigkeiten.

Aber wenn ich es mit Delphi verbinde nur Error oder Ausserhalb des Bereichs oder er zeigt mir Traumzahlen

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
item:TListItem;
 begin
  con.LibraryLocation:=ExtractFilePath(application.ExeName)+'sqlite3.dll';
  con.Database:=ExtractFilePath (application.ExeName)+'test.sqlite';
  con.Connected:=true;
  Query1.SQL.Clear;
  Query1.Params.Clear;
  Query1.SQL.Text :='SELECT * FROM Versuch';
  Query1.Open;
  while not Query1.Eof do
  begin
  Item:=Form1.listview1.items.Add;
  Item.Caption:=(Query1.FieldByName('id').AsString);
  Item.SubItems.Add(Query1['Test']);
  Item.SubItems.Add(Query1['Test2']);
  Query1.SQL.Text:='Select SUM(Test) as blabla FROM Versuch';
  Query1.Open;
  Edit1.Text:=Query1.FieldByName['blabla'].asString;
  Query1.Close;
  end;
 end;
end.

Danke für jede Hilfe!