Delphi-PRAXiS - Delphi Bogen Zeichnen!!!!!!!!!!

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Bogen Zeichnen!!!!!!!!!! (https://www.delphipraxis.net/56914-bogen-zeichnen.html)

fabgo

13. Nov 2005 12:07

Bogen Zeichnen!!!!!!!!!!

Hallo,

habe ein Problem, möchte in delphi einen bogen zeichnen,
also eigentlich einen ganz normalen halkreis nach unten.

Folgendes klappt nicht:

Delphi-Quellcode:

			
MoveTo (PenPos.X-20,PenPos.Y-40);

      Arc (PenPos.X,PenPos.Y,PenPos.X+20,PenPos.Y+40,PenPos.X,PenPos.Y+20,PenPos.X+20,PenPos.Y+20);   // Türbogen

der ist dann immer nur nach oben geöffnet.

danke im vorraus

Daniel

13. Nov 2005 12:08

Re: Bogen Zeichnen!!!!!!!!!!

Nimm' doch bitte die Ausrufezeichen aus dem Titel - rumbrüllen ist glücklicherweise nicht nötig. ;-)

Flocke

13. Nov 2005 12:11

Re: Bogen Zeichnen!!!!!!!!!!

Vertausche doch einfach mal Start- und Endpunkt.

fabgo

13. Nov 2005 12:25

Re: Bogen Zeichnen!!!!!!!!!!

danke, hat gefunzt

fabgo

Chegga

13. Nov 2005 12:43

Re: Bogen Zeichnen

Hi,

imho geht das mit Delphi-Referenz durchsuchen

Canvas.Pie viel doch einfacher. :wink:
Zum Beispiel:

Delphi-Quellcode:

Canvas.Pie(10,10,310,210,310,110,10,110);

MfG Marc

Alle Zeitangaben in WEZ +1. Es ist jetzt 03:47 Uhr.