TADOQuery

[sx2008]

Vielleicht hast du vergessen die Query zu öffnen.
Ich würde empfehlen, den Code für die Berechnung in das Datenmodul zu legen:

Delphi-Quellcode:

function TModul.GetKontoBalance():Currency;
begin
  BuchungenQry.Close;
  BuchungenQry.open;
ShowMessage(BuchungenQry.FiledList.Text); // Alle Feldnamen anzeigen zu Debugzwecken
  Result := BuchungenQry.FieldByName('HabenBetrag').AsCurrency - BuchungenQry.FieldByName('SollBetrag').AsCurrency;
end;

Wenn dieser Code läuft, dann würde ich zusätzlich noch die Parameter wie Kontonummer, Buchungszeitraum dieser Funktion übergeben.

Zusätzlich ist zu beachten, dass alle Berechnungen mit Geldbeträgen mit dem Datentyp Currency ausgeführt werden sollten um Rundungsfehler zu vermeiden.