Sqr nicht das selbe ..

[EWeiss]

Hab ein kleines Programm geschrieben in VB welches ich nach Delphi protiere

Wie kann ich Sqr verwenden damit ich auf das gleiche Ergebnis komme?
in VB ist Sqr als Double deklariert.
in Delphi als Real(Extended) oder als Integer.

Deshalb kommt es zu unterschiedlichen Ergebnissen.

Delphi-Quellcode:

  Dx := 331;
  Dy := 50;
  LenI := Sqr(Dx * Dx - Dy * Dy);

´
Ergebnis ist -1422844167

Code:

Dx = 331
Dy = 50
LenI = Sqr(Dx * Dx + Dy * Dy)

Ergebnis ist 335

Das hat zur folge das mir in Delphi die richtigen Maus positionen nicht übergeben werden
und mein vergleich immer ins negative geht.

gruss