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

[Angel4585]

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