размер эллипса в делфи через эдит.

скажите пожалуйста как в делфи сделать так что бы чем больше было число в эдите тем больше был диаметр круга?
var a: real;
begin
a:=strtofloat(edit1.Text);
form1.Canvas.Brush.Color:=clRed;
form1.Canvas.Ellipse(0,0,a,a);
end;

end.
Это мой код. Система пишет что эллипс не работает с такими аргументами(точно не помню что он написал но если в общих чертах то так).