Punkt in Abhängigkeit eines Winkels berechnen

[Blup]

Noch mal ganz langsam zum mitschreiben:

Code:

  V1: TPoint = (x = 5, y = 0); // Vektor
  P1: TPoint = (x = 3, y = 4); // Ausgangspunkt
  A:  Double = 90;               // Winkel eventuell noch umrechnen

Den Vektor drehen:

Code:

V2.x = V1.x * cos(a) - V1.y * sin(a)
V2.x = 5    * 0      - 0    * 1
V2.x = 0
--------

V2.y = V1.y * cos(a) + v1.x * sin(a);
V2.y = 0    * 0      + 5    * 1
V2.y = 5
--------

Den Punkt verschieben:

Code:

P2.x = P1.x + V2.x
P2.x = 3    + 0
P2.x = 3
========

P2.y = P1.y + V2.y
P2.y = 4    + 5
P2.y = 9
========