Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Abprallrichtung von Linie (https://www.delphipraxis.net/3873-abprallrichtung-von-linie.html)

janjan 3. Apr 2003 19:30

Wenn mich nicht alles täuscht, dann sollte das so aussehen:
Delphi-Quellcode:
Winkel := ArcTan(GK/AK);

Florian H 3. Apr 2003 19:35

Nee...da käme z.B. für
GK = 1 und AK = 1
0,78... raus.
Sollte aber eigentlich 90(°) sein!

janjan 3. Apr 2003 19:42

Schonmal dran gedacht, das Delphi im Bogenmaß rechnet und nicht in Grad? 0,78 sind ca. Pi/4 und das ist dasselbe wie 90 Grad.

In Grad ist eine Umdrehung 360 Grad, im Bogenmaß halt 2*Pi.

Zum Umrechnen vom Bogenmaß in Grad musst du den Wert den ArcTan zurückgibt * 360/(2*Pi) rechnen.

Um von Grad ins Bogenmaß zu konvertieren musst du den Wert *(2*Pi)/360 rechnen.

Delphi-Quellcode:
function GetWinkel(GK : real; AK: real): real;
begin
  result:= ArcTan(GK/AK)*360/(2*Pi);
end;

Florian H 3. Apr 2003 20:17

Geil ich habs jetzt...hab mit radToDeg aus Math umgerechnet...(hab dein edit nicht gesehen)!
Danke euch allen!

mars 3. Apr 2003 23:00

Zitat:

Zitat von janjan
Schonmal dran gedacht, das Delphi im Bogenmaß rechnet und nicht in Grad? 0,78 sind ca. Pi/4 und das ist dasselbe wie 90 Grad.

Schon mal daran gedacht, dass Pi/4 nicht 90°, sondern 45° sind? :wink: Aber das ist ja auch richtig so, denn bei einer Gegenkathete und Ankathete von 1 sollte das Resultat 45° sein.

Florian H 4. Apr 2003 13:12

Gibt es auch ne Möglichkeit, das mit 360° zu machen?
Weil so wie es jetzt ist, kann ich den Winkel nicht mehr in eine eindeutige Richtung zurückberechnen...weil es nur von -90° zu 90° geht...


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:38 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz