AV bei doppeltem Aufruf einer Prozedure

[Helmi]

Hallo,

ich hätt da mal eine Frage:

Kann es sein, dass es bei folgendem (doppeltem) Prozedur-Aufruf zu einer Access Violation kommen kann?

Delphi-Quellcode:

procedure TForm1.PROZESS_1;
begin
{...}

  mach_was;

  PROZESS_2;  
{...}
end;

procedure TForm1.PROZESS_2;
begin
{...}

  mach_was;

  PROZESS_1;  
{...}
end;

[alcaeus]

Theoretisch keine AV, aber ein Stack-Ueberlauf. Das ist eine Art von Rekursion

Greetz
alcaeus

[Waldteufel]

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;

[Helmi]

Hallo,

ich hatte das Phänomen dass immer mal wieder eine Access Violation auftauchte, aber nur in einer bestimmten Situation.

Deshalb hab ich die Prozeduren, die daran beteiligt sind, kontrolliert und bin darauf gekommen, dass ich das obrige Beispiel hatte.

Ich hab das jetzt mal so umgeschrieben, dass das nicht mehr passieren kann.

Ich hoffe, dass das jetzt die Rätsels Lösung war. Nur war ich mir nicht sicher, ob das eine AV auslösen könnte.