endlosschleife machen?

[HuxXx]

Für was brauchst du denn endlosschleifen..??

Aber egal:

Delphi-Quellcode:

var i:integer;
begin
i:=1;
repeat
// mach was
until i=23;