Allerdings. Sehr sehr schöne Lösung. Bewundernswert wenn man so was kann. Du hast mir damit einen riesen Gefallen getan. Hab nochmal vielen lieben Dank.
BTW, seh ich doch richtig, daß für P4 P1 und P2 nur getauscht werden müssen?
Delphi-Quellcode:
P3.X := C * C * P1.X - C * S * P1.Y + S * S * P2.X + C * S * P2.Y;
P3.Y := -C * S * P1.X + S * S * P1.Y + C * S * P2.X + C * C * P2.Y;
P4.X := C * C * P2.X - C * S * P2.Y + S * S * P1.X + C * S * P1.Y;
P4.Y := -C * S * P2.X + S * S * P2.Y + C * S * P1.X + C * C * P1.Y;
N'abend
Ja das sollte so passen. Freut mich auch, dass mein Ingenieursstudium anscheinend nicht umsonst war
P.S.: Falls du auf das letzte Quäntchen Performance angewiesen bist, würde ich die Koeffizienten vorher berechnen und zwischenspeichern.