Canvas-Polygon

[mr_emre_d]

Delphi-Quellcode:

TForm1...
  public
  ....
    MittelPunkt: TPoint;
    Lange: Integer;
  ....
  end ..

...

// formcreate:
MittelPunkt := Point( 200, 200 );
Lange := 100;

PS: Zeig mal her, was du schon soweit selbst geschafft hast !