Einzelnen Beitrag anzeigen

Amenovis

Registriert seit: 17. Nov 2011
52 Beiträge
 
#1

Select Sum(Fieldname) From Table

  Alt 14. Nov 2018, 20:39
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!
  Mit Zitat antworten Zitat