Das habe ich in meinem ersten Post bereits geschrieben: Statt eine 360°-Einteilung hast du hier eine Einteilung von 0 bis 2pi.
Um einen "normalen" Winkel ins Bogenmaß umzurechnen rechnest du *pi/180.
das hier ist Vermurkst:
Delphi-Quellcode:
x1 := {100+}cos(winkel); // Hier ist das falsch
y1 := {100+}sin(winkel); // "
x := round(x1 * 20)+100; // eher hier ;) sonst wird die 100 ja mitmultipliziert und du zeichnest irgendwo ins nirgendwo (Koordinate > 2000)
y := round(y1 * 20)+100; // "