AggPas - Anti-Grain Geomertry for Object Pascal

TAgg2D.AddEllipse(cx, cy, rx, ry, dir)

Description

Adds a new closed subpath comprising of a complete ellipse at defined coordinates with defined horizontal and vertical radius. Previous subpath is leaved as is, closed or open.

Current Point is finally changed to be at the 3 hours of a new ellipse segment.

Parameters

cx: double

X coordinate of ellipse's center point [in subpixels].

cy: double

Y coordinate of ellipse's center point [in subpixels].

rx: double

Horizontal ellipse radius [in subpixels].

ry: double

Vertical ellipse radius [in subpixels].

dir: TAggDirection [*]

Constant defining the direction in which the ellipse's perimeter will be generated.

Example

if VG.Attach(Image1.Picture.Bitmap) then
  begin VG.ClearAll (255, 255, 255); VG.FillColor($FF, $00, $00);

  // First subpath comprising of a single line
  VG.MoveTo(10, 10); VG.LineTo(50, 50);

  // Add an Ellipse closed subpath to the path
   VG.AddEllipse(100, 80, 80, 50, AGG_CW);

  // Second single line from new Current Point
  // starting at 3 hours of ellipse's perimeter
  VG.LineTo(200, 150);

  // Render path 
  VG.DrawPath(AGG_FillAndStroke);

end;

Screenshot:
      AddEllipse example