Halbkreise dynamisch zeichnen

[sneak87]

Hi, ich benötige für mein Programm den Term, um Halbkreise dynamisch zeichnen zu können, in Abhängigkeit von x.

ich habe es schon damit versucht:

Delphi-Quellcode:

begin
//...//

for i:=1 to 100 do begin
x:=i; 
  y1:=-sqrt((r*r)-(x*x));
   y2:= sqrt((r*r)-(x*x));

... try image1.Canvas.lineto(round(x),round(y1));
       image1.Canvas.Lineto(round(x),round(y2));
finally end;
end;

aber es klappt überhaupt nicht, habt ihr für mich da ne Hilfe... würde mich sehr freuen...

danke... mfg lars