在Delphi中如何画一个圆

Question

在accass中动态添加一个圆的每个坐标的数据库，然后每调一个坐标在From中画一个，最后画成一个圆，画完后坐标与圆清除重绘。

Answer 1

Canvas.Ellipse(x-r,y-r,x+r,y+r);
x，y：圆的左上角坐标
r：半径

Answer 2

麻烦