Primzahlen ausgeben (Problem)

[Reincanation]

OK, danke stimmt

aber wenn ich das jetzt so anschreibe dann werden die Zahlen einfach nach der Reihe ausgegeben und der Mod Vorgang wird ignoriert -.-

EDIT:

ah das mit dem mod seh ich erst jetzt!
aber wie kann man das umgehen?

sry ich bin ein vollidiot auf dem Gebiet Delphi -.-

Delphi-Quellcode:

var
i:integer;
begin
i:=0;
repeat
i:=i+1;
if i mod i = 0 then
label1.caption:=label1.caption+inttostr(i)+char(13);
until i=100;
end;