floating point invalid operation: 10.1 vs. 10.2

[striderx]

Der nachstehende Code läuft unter Delphi 10.1 ohne Problem, bei Delphi 10.2 kommt eine Exception (floating point invalid operation). Plattform ist jeweils Windows 32 Bit.

Delphi-Quellcode:

procedure TdlgMain.Test3;

var
  AWord:    Word;
  ADouble:  Double;

begin
  AWord   := 64536;
  ADouble := SQRT(SQR(AWord) + SQR(AWord));
end;

???

Da ich den Source-Code von 10.1 nicht habe (Starter), kann ich nicht nachsehen, ob sich da etwas getan hat.