Schreibt den Inhalt der DB nicht in die VAR

[0NyX]

Guten Tag liebe DP User,

ich beschäftige mich nun seit 3 Tagen mit SQL-Datenbanken. Ich nutze eine FireBird Datenbank und greife mit den IBO tools drauf zu.

Nun habe ich aber ein Problem und zwar übergibt es die Daten aus einem Field nicht in die VAR.
Könntet ihr mir vllt. sagen was ich da falsch gemacht habe? Über jegliche Hilfe würde ich mich sehr freunen.

Delphi-Quellcode:

procedure TRechnung.rechnungerstellen;
begin
  qRechnung.SQL.Text:='select PERSONENID, SUM(PREIS),(select NACHNAME from PERSONEN where personen.id=BESTELLT.personenid) as PERSON FROM BESTELLT where personenid='+IntToStr(vPersonenID)+' and bestaetigt=1 and rechnungid is null group by PERSONENID';
  qRechnung.ExecSQL;
  vBETRAG:=qRechnung.FieldByName('SUM').AsFloat;
end;

Vielen Dank im voraus!

Gruß