Einzelnen Beitrag anzeigen

Alex_ITA01

Registriert seit: 22. Sep 2003
1.115 Beiträge
 
Delphi 12 Athens
 
#1

Probleme mit AngleArc

  Alt 20. Dez 2006, 08:18
Hallo erstmal,
ich habe folgendes Problem:

Ich möchte zwei "viertel Kreise" auf einem Canvas zeichnen.
Der erste soll sich auf der linken Seite des Canvas-Image befinden und der andere auf der rechten Seite.
Der erste soll von links 90° abwärts nach rechts gebogen werden und der zweite soll von links 90° aufwärts nach rechts gebogen werden.
Ich habe mir die Funktion AngleArc genommen aber irgendwie komme ich nicht klar.
Den zweiten viertel Kreis habe ich schon so hinbekommen:

Delphi-Quellcode:
  Image1.Canvas.Moveto((Image1.Width Div 2), Image1.Height Div 2);
  AngleArc(Image1.Canvas.Handle,
           Image1.Width div 2,
           Image1.Height div 2,
           60,
           90,
           90);
Vielleicht könnt ihr mir weiter helfen, den ersten auch darzustellen.
Mein Problem sind die Startpunkte des Stiftes.
Wenn man sich das anguckt, ist der Startpunkt nicht immer der Beginn des Winkels sondern in der Mitte.
Ich hoffe ihr versteht mein Problem und könnt mir helfen.
MFG Alex


EDIT:
Ich habe jetzt beide viertel Kreise hinbekommen aber meine Startpositionen stimmen nicht

Delphi-Quellcode:
  Image1.Canvas.Moveto((Image1.Width Div 2), Image1.Height Div 2);
  AngleArc(Image1.Canvas.Handle,
           Image1.Width div 2,
           Image1.Height div 2,
           60,
           90,
           90);

  Image1.Canvas.Moveto((Image1.Width Div 6), Image1.Height Div 2);
  AngleArc(Image1.Canvas.Handle,
           Image1.Width div 6,
           Image1.Height div 2,
           60,
           360,
           90);
Let's fetz sprach der Frosch und sprang in den Mixer
  Mit Zitat antworten Zitat