Polygon drehen

[christopher85]

Super! Dank Dir Jaenicke!

Nun stellt sich mir noch die Frage wie ich u und das dazugehörige v als Koordinaten wieder als Punkt zeichnen kann.
xp[u] und yp[v].

Weil ja durch diese for-Schleife u und v innerhalb kurzer Zeit wieder überschrieben werden. Also muss ich ja innerhalb dieser for-Schleife die Punkte schon zeichnen lassen.

Also mal für mich so zur Chronologie:
//erst die Punktkooridnaten berechnen

Delphi-Quellcode:

u:=yp[n]*sin(w)+xp[n]+cos(w);
    v:=yp[n]+cos(w)-xp[n]+sin(w);

//dann vermutlich in die Matrix einfügen
u:=xp[n] v:=yp[n] sry. bin da geistig nackig
//dann vielleicht das spiel mit der Polygonverbindung von Anfang an
if n=1 then image1.Canvas.MoveTo(x,y) ;
image1.Canvas.LineTo(xp[n],yp[n]);


EDIT: was mir gerade noch einfällt: ist es nicht doof Nachkommastellen für ein Canvasarray zu verwenden. das nimmt doch sicherlich nur ganzzahlige Werte, oder?