Thema: Delphi Ellipse - TImage

Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#2

Re: Ellipse - TImage

  Alt 22. Aug 2006, 18:56
Naja der Mittelpunkt des Kreises ist auf halber Strecke von dem Quadrat... Wie lang und von wo bis wo die Strecke geht müsstest du wissen weil du sie ja schon gezeichnet hast... und von da aus soll der Kreis einen Radius halb so groß haben wie die halbe Seite des Rechtecks... Naja das lässt sich doch schnell ausrechnen Bei Canvas.Ellipse gibst du die gleichen Koords an wie bei Rectangle nur das dann der Innenkreis dieses Rechtecks gemalt wird.

Die Koords die du brauchst sind:

Canvas.Ellipse(Rect.x,Rect.y - (Rect.Width div 2), Rect.x + Rect.Width, Rect.y + (Rect.Width div 2)); Wenn ich mich nicht irre.

Rect.x ist die x-Koordinate vom Punkt oben links von deinem Rechteck
Rect.y ist die y-Koordinate vom Punkt oben links von deinem Rechteck

Rect.Width := Rect.x2 - Rect.x

Nochmal zur veranschaulischung

Gruß
Neutral General
Miniaturansicht angehängter Grafiken
delphihc0_185.png  
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat