Nimm dir irgendeine Zeichenfläche und zeichne 'ne Linie mit LineTo und MoveTo darauf.
Den Mittelpunkt hast du ja und von da aus kannst du mit den Funktionen Sin und Cos den zweiten Punkt berechnen.
Delphi-Quellcode:
Canvas.MoveTo(X, Y);
Canvas.LineTo(X + Round(Cos(Winkel) * Durchmesser), Y - Round(Sin(Winkel) * Durchmesser));