Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#1

Iso Ellipse mit Delphi erzeugen

  Alt 24. Feb 2009, 23:17
Hallo

ist es möglich mit Delphi eine isometrische Ellipse wie im Bild zu erstellen

Mein versuch mit Polygon hat nicht geklappt :
Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
begin
  Canvas.Polygon([Point(50, 50), Point(50, 150),
        Point(150, 100), Point(150, 0)]);
  Canvas.Ellipse(50, 50, 150, 100);
end;
Der Winkel soll 30° wenn nicht dann 45°
Miniaturansicht angehängter Grafiken
iso_ellipse_829.jpg  
  Mit Zitat antworten Zitat