Iso Ellipse mit Delphi erzeugen

[thomas2009]

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°

[jfheins]

Du hast generell 2 Möglichkeiten:

1. Ellipse berechnen und entsprechend drehen

2. Ellipse groß zeichnen und dann die Pixel vertikal so verschieben, dass es passt ...

Direkt so zeichnen wie auf dem Bild geht nicht, das die Hautpachse (maximale Breite) nciht horizontal/vertikal sondern schräg ist ...

[Sir Rufo]

schau doch mal hier ... http://www.delphi3000.com/articles/a...asp?SK=ellipse