Funktion rekursiv aufrufen

[EWeiss]

Ist es möglich eine Funktion innerhalb einer Schleife
Rekursiv aufzurufen ?

Delphi-Quellcode:

Procedure List_Menu(hWnd, hmenu : DWORD; sys : Boolean);

If MenuList[cnt].nType = 1 Then
  begin
  subMenu := GetSubMenu(hmenu, i);
  menuCnt := GetMenuItemCount(subMenu);
  MenuList[cnt].nSub := menuCnt;
  List_Menu(hWnd, subMenu, False);
  end;

gruß

[mkinzler]

Grundsätzlich ja.

[3_of_8]

1. Warum sollte es das nicht?
2. Wo siehst du da eine Schleife?
3. ein begin...end; würde dem ganzen nicht schaden.

[Daniel]

Da ist keine Schleife.



Solange Du Dich um die korrekte Abbruch-Bedingung kümmerst, sollte die Rekursion jedoch kein Problem sein.

[EWeiss]

Liebe Leute
Die IF Abfrage befindet sich innerhalb einer schleife

Hat sich erledigt.

Gruß

[mkinzler]

Zitat:

Will nicht Sad

das heißt?

[EWeiss]

Zitat von mkinzler:

Zitat:

Will nicht Sad

das heißt?

List_Menu(hWnd, subMenu, False); Wenn ich die Funktion wieder aufrufe gibt es einen AV.. Warum ?

Gruß

[Zacherl]

Ich denke mal nicht, dass das an der Rekursion liegt, sondern viel mehr an deiner Funktion.

Florian

[mkinzler]

Debugge dein Programm mal und schaue, wo die AV genau auftritt.

[EWeiss]

Zitat von Florian Bernd:

Ich denke mal nicht, dass das an der Rekursion liegt, sondern viel mehr an deiner Funktion.

Florian

Jetzt versteh ich gar nichts mehr ?? Was ist denn nun verkehrt?
Die Funktion ist in Ordnung läuft alles einwandfrei bis dieses Zeile aufgerufen wird
welche das Standard Menü einer Anwendung ausgibt.

Beim SystemMenü funktioniert das einwandfrei.

EDIT: Hat sich erledigt.

gruß