Ellipse

function Ellipse(const rec: TRect; steps: integer = 0): TPathD; overload;

function Ellipse(const rec: TRectD; steps: integer = 0): TPathD; overload;


  uses 
    Image32, Image32_PNG, Image32_Vector, Image32_Draw;
  ...
var
  path, path2: TPathD;
  rec: TRect;
  img: TImage32;
begin
  img := TImage32.create(256,256);
  rec := Rect(10,30, 256-10, 256-30);
  path := Ellipse(rec);
  DrawLine(img1, path, 20, clNavy32, esClosed);
  path := Arc(rec, 90 *Pi/180, 360 *Pi/180);
  DrawLine(img1, path, 5, clYellow32, esRound);
  img.SaveToFile('arc.png');
  img.Free;