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!

Delphi-Quellcode:

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

Auch das geht nicht:

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..