Thema: Delphi TADOQuery

Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#2

AW: TADOQuery

  Alt 31. Mai 2013, 14:14
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.
fork me on Github
  Mit Zitat antworten Zitat