ImageEn, unit iegdiplus

TIECanvas.Ellipse

TIECanvas.Ellipse


Declaration

procedure Ellipse(X1, Y1, X2, Y2: Integer); overload;
procedure Ellipse(const Rect: TRect); overload;


Description

Draw an ellipse within a specified area.
The ellipse border is set by Pen and the fill by Brush.

GDI+ Methods: GdipFillEllipse, GdipDrawEllipse

Note: The X2 and Y2 points are excluded from the painting


Examples

// Draw an anti-aliased ellipse onto a TBitmap
iec := TIECanvas.Create( ABitmap.Canvas );
with iec do
begin
  Pen.Style := psSolid;
  Pen.Mode  := pmCopy;
  Pen.Color := clRed;
  Brush.Style := bsClear;
  Ellipse( Rect( 100, 100, 200, 200 ));
end;
iec.Free;

// Draw an anti-aliased ellipse onto a TIEBitmap
with iebmp.IECanvas do
begin
  Pen.Style := psSolid;
  Pen.Mode  := pmCopy;
  Pen.Color := clRed;
  Brush.Style := bsClear;
  Ellipse( Rect( 100, 100, 200, 200 ));
end;


See Also

 AdvancedDrawShape