Delphi-PRAXiS - Ergebnis der Suchanfrage

Ergebnis der Suchanfrage

Datum des Suchindex: Heute, 17:17

Parameter dieser Suchanfrage:

Suche in Thema: Frage zu Winkelberechnungen...
Suche alle Beiträge, die von "chrisw" geschrieben wurden

• Suchmethode: "Suche nach allen Begriffen"
• Nach Datum (firstpost) sortiert
• Zeige Treffer als Beiträge

Zeige 1 von insges. 1 Treffern
Suche benötigte 0.005s

Es liegen Ergebnisse in folgenden Bereichen vor:

Forum: Programmieren allgemein
Re: Frage zu Winkelberechnungen...

by chrisw, 28. Nov 2005
Hab das mal so gelöst, ist aber schon länger her !
function AngleOfPoint (Pt :TPoint) : double;
begin
Result := 0;
if ((Pt.X = 0) and (Pt.Y < 0)) then Result := 270 else
if ((Pt.X = 0) and (Pt.Y > 0)) then Result := 90 else
if ((Pt.X > 0) and (Pt.Y >= 0)) then Result := ArcTan(Pt.Y / Pt.X) * RadToDeg else
if ((Pt.X < 0) and (Pt.Y > 0)) then Result := 180 + ArcTan(Pt.Y /...

URL zu dieser Suchanfrage:

https://www.delphipraxis.net/dp_search.php?do=usersearch&search_username=chrisw&search_exact_username=1&search_sortby=dateline&search_resulttype=post&search_matchmode=0&searchthreadid=57884

Ergebnis der Suchanfrage

Parameter dieser Suchanfrage:

Es liegen Ergebnisse in folgenden Bereichen vor:

Re: Frage zu Winkelberechnungen...

URL zu dieser Suchanfrage: