alle Integerkoordinaten eines Kreises

[Delphi-Narr]

Also wenn ich das jetzt richtig verstanden habe, dann muss das so gemacht werden:

Shape: Alle Werte = 100

Delphi-Quellcode:

var
SL:TStringlist;

...


while 0<i<2*pi do
  begin
       SL.Add(IntToStr(round(sin(i))));
       SL.Add(IntToStr(round(cos(i))));
  end;

Stimmt das so. Wenn die Werte nur ungefähr sind, reicht das völlig aus.
Ich aber wirklich ALLE Punkte, die IM Kreis liegen, also auch Mittelpunkt, Mittelpunkt -1 etc...
Wird dies durch diese Schleife erreicht?