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;