Forum: Object-Pascal / Delphi-Language
by Tyrael Y.,
16. Dez 2009
@Uwe Raabe
Natürlich ist dies eleganter.
kollosion := Hypot(X2-X1, Y2-Y1) = 0;
Ich wollte aber dem Threadersteller Pythagoras nicht "verschleiern" deshalb Power, damit der den Bezug sieht.
Beides ist aber Pythagoras und bei meinem sieht man den Bezug.
@Delphi-Narr
Forum: Object-Pascal / Delphi-Language
by Tyrael Y.,
15. Dez 2009
Pythagoras ist dein Freund.
a² + b² = c²
Wenn zwei Punkte den Abstand Null zueinander haben dann haben sie kollidiert, soll heißen
var kollision: boolean;
...
kollosion := Sqrt(Power(X2-X1, 2) + Power(Y2-Y1, 2)) = 0;