I was wondering if any of you can help me out, im still new to this.
I am trying to do a simple animation using pascal i.e. enlarging and shrinking a circle.
This is my code to draw the circle.
procedure plotCircle(xCent, yCent, rad: integer);
Form1.Canvas.Pen.Width := 2;
Form1.Canvas.Pen.Color := clBlack;
Form1.Canvas.Brush.Color := clblack;
I tried using if and then functions to do it, but it wont work e.g. if rc = 25 then rc:= rc+ 10 etc.
It seems like a for loop is suitable for this, but i have no idea how to get around doing it.