Einzelnen Beitrag anzeigen

Angel4585

Registriert seit: 4. Okt 2005
Ort: i.d.N.v. Freiburg im Breisgau
2.199 Beiträge
 
Delphi 2010 Professional
 
#1

Welche Zahl ist größer 50, kleiner 60 und gerundet 0?

  Alt 11. Jul 2006, 15:10
Hallo,

ich hab folgenden Codeabschnitt in meinem Quelltext:

Delphi-Quellcode:
function TForm1.Test : string;
var xtest : real;
begin
with MyZQuery do
  try
    sql.Text:='SELECT * FROM Tabelle';
    Active:=True;
    if (FieldByName(cfGesamtpreis).AsFloat>50.0)and(FieldByName(cfGesamtpreis).AsFloat <60.0) then
      xtest:=FieldByName(cfGesamtpreis).AsFloat;//in xtest wird hier dauernd 5,2598911262e-307 geschrieben
    Result:=FieldByName(cfID).AsString;
  finally
    Active:=False;
    end;
end;
Also.. kann mir jemand sagen was da los ist?

Danke

Martin Weber
Ich bin ein Rüsselmops
  Mit Zitat antworten Zitat