Okay, das Problem hat sich nun erledigt. Der StackOverflow war ja schon beseitigt, und dass die Prozedur sich nur 1mal aufgerufen hat lag am "else if" statt "if"..
Wer den Code mal benötigen sollte, so funktioniert es bei mir:
Delphi-Quellcode:
procedure TForm1.Prim_re(n,i:integer);
var prim:boolean;
begin
if n < limit then
begin
if i = 1 then List2.Items.Add(IntToStr(n));
if (n mod i) = 0 then Prim_re(n+1,n)
else Prim_re(n,i-1);
end;
end;
Danke für eure Hilfe!