Distanz 2er Punkte berechnen

[DGL-luke]

naja, so gehts auch, und man spart sich einmal stackgeschiebe, die doppelte subtraktion sollte der compiler rausoptimieren... :-\ (würde er das stackgeschiebe aber vielleicht auch, man kann ja seit neuestem inlinen :angel2: )

[s-off]

Lukas,

etwas in der Schule gelernt zu haben, und 20 Jahre später bei einem akuten Problem einzusetzen, bzw. sich daran zu erinnern, sind zwei Paar Schuhe!

Gelernt habe ich das auch, keine Frage.
Hätte ich aber die Distanz zwischen zwei Punkten berechnen müssen, hätte ich genau so dumm da gestanden, wie Doreen. Und warum? Weil ich diesen Kram seit x Jahren nicht mehr gemacht, und wegen mangelndem Interesse auch nicht im Arbeitsspeicher parat habe.

Klar, wenn mir jemand sagt 'Nimm den Satz des Pythagoras', dann kann ich damit auch schnell die Distanz berechnen, denn eine einfache Gleichung nach c aufzulösen verlernt man nicht. Aber ich wäre nicht darauf gekommen, dass der Pythagoras in diesem Fall mein Mittel zum Zweck ist.
Und dafür kann man niemandem einen Vorwurf machen!

Desweiteren sagt mir die von DeddyH genannte Verwendung von Hypot() wesentlich mehr zu, als Dein mathematischer Erguss.
Soll kein Herunterspielen Deiner mathematischen Fähigkeiten sein; verwirrt die Fragerin aber wohl zusätzlich.

[DGL-luke]

der mathematische erguss ist in der wikipedia zu finden (und in kurzform für jeden mathematisch befähigten im kommentar um meinen code formal zu überprüfen); ich habe (hoffentlich) funktionierenden code geschrieben.

[DeddyH]

Wenn, dann müsste es doch

Delphi-Quellcode:

function DistanceBetween(const p1,p2: TPoint): extended;
begin
  Result := sqrt(sqr(p1.X - p2.X) + sqr(p1.Y - p2.Y));
end;

heißen, oder täusche ich mich?

[DGL-luke]

selbstverständlich. Irgendein scherzbold muss da in seinem pseudocode ein semikolon komma reingemacht haben :zwinker: