Delphi Funktion rekursiv aufrufen - Seite 2

Thema durchsuchen

Ansicht

Themen-Optionen

Funktion rekursiv aufrufen

Ein Thema von EWeiss · begonnen am 1. Nov 2006 · letzter Beitrag vom 1. Nov 2006

Vorheriger Beitrag

Nächster Beitrag

EWeiss

(Gast)

n/a Beiträge

Funktion rekursiv aufrufen

1. Nov 2006, 21:13

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

markieren

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ß