رسم دائرة أو شكل بيضوي

رسم دائرة أو شكل بيضوي

procedure TForm1.Button1Click(Sender: TObject);
begin
 Form1.Canvas.Ellipse(10,10,100,100);
end;