Einzelnen Beitrag anzeigen

Benutzerbild von Seniman
Seniman

Registriert seit: 15. Sep 2003
Ort: Münster
98 Beiträge
 
#3

Re: Rotierenden Vektor ausgeben

  Alt 21. Jan 2004, 23:04
Hallo DeadEternity,

probier es mal so: Wenn (mx,my) der Mittelpunkt ist, um den sich der Vektor dreht, "laenge" die Länge des Vektors ist und "winkel" der Winkel ist, dann berechnest du die Koordinaten x und y des zu zeichnenden Punktes so:

Delphi-Quellcode:
x:=mx+laenge*cos(Winkel);
y:=my+laenge*sin(Winkel);
Falls x und y unbedingt Integer sein müssen, dann mache es so:

Delphi-Quellcode:
x:=Round(mx+laenge*cos(Winkel));
y:=Round(my+laenge*sin(Winkel));
(Das ist im Prinzip der gleiche Code wie von Jens, nur übersichtlicher, wegen der eindeutigeren Bezeichnungen)
Beim Berechnen von Sinus und Kosinus musst du beachten, dass der Winkel in Bogenmaß angegeben werden muss.

Grüße
Seniman
  Mit Zitat antworten Zitat