|
Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.429 Beiträge
Delphi 10.4 Sydney
|
AW: Objektrotation in Abhängigkeit
16. Mai 2014, 08:35
Um ein Objekt um einen Punkt rotieren zu lassen, transformiert man die Koordinaten der Punkte dieses Objektes in ein Koordinatensystem, dessen Ursprung der Rotationspunkt ist.
P1 = P0 - PR
Anschließend kann man mit der Rotationsmatrix multiplizieren.
P2 = P1 * R
Zum Schluss transformiert man die Koordinaten wieder in das ursprüngliche Koordinatensystem.
P3 = P2 + PR
Also für zwei Koordinaten in deinem Fall:
X1 = X0 - XR
Y1 = Y0 - YR
X2 = +(X1*cos(90)) + (Y1*sin(90))
Y2 = -(X1*sin(90)) + (Y1*cos(90))
X3 = X2 + XR
Y3 = Y2 + YR
|