Nicht nachvollziehbare Invalid floating point operation

**Fussball-Robby**

Hey,
folgendes funktioniert (Zahlen kommen eigentlich von Funktionen, sind hier als Zahlen selbst eingefügt):

Delphi-Quellcode:

			var

  X: Extended;

begin

  X := Round((5.4097598831e+17 / (2 * 13.685690504)) * 497);

  ShowMessage(FloatToStr(X));

Folgendes aber funktionert nicht, obwohl Image1.Height = 497 ist!

markieren

Delphi-Quellcode:

			var

  X: Extended;

begin

  X := Round((5.4097598831e+17 / (2 * 13.685690504)) * Image1.Height);//<-EInvalidOp

  ShowMessage(FloatToStr(X));

Auch das geht nicht:

markieren

Delphi-Quellcode:

			var

  X: Extended;

  P: Extended; //oder Integer

begin

  P := Image1.Height;

  X := Round((5.4097598831e+17 / (2 * 13.685690504)) * P);//<-EInvalidOp

  ShowMessage(FloatToStr(X));

Ich kann das absolut nicht nachvollziehen. Könnt ihr mir auf die Sprünge helfen?
P.S.: Wenn ich das e+17 auf e+16 runtersetze, funktioniert es. Trotzdem merkwürdig..

Nicht nachvollziehbare Invalid floating point operation

Nicht nachvollziehbare Invalid floating point operation

Forumregeln