Hi.
Das kann sein, da du hier eine nichtabbrechende indirekte Rekursion hast. Prozess_1 ruft Prozess_2 auf, der wiederum Prozess_1 aufruft... usw.
Du musst also irgendwie ein Abbruchkriterium finden
Ungefähr so :
Delphi-Quellcode:
procedure p1(i : integer);
begin
p2(i + 1)
end;
procedure p2(i : integer);
begin
if i < 1000 then p1(i+1);
end;