Re: Clonage des options de menus

Posté par daniel le 17/10/2008 12:19:41
Il y a la solution par les API, mais dans ce cas on perd les menus made in Windev.

Il y a la solution pure Windev qui passe par le MenuAjoute

voici un exemple de code


PRO_init_menu(pMenu,PmenuC est chaîne ,pTableau est une chaîne)
i est entier
Xlt_menu est chaîne // nom menu mère

Xlt_menu = ExtraitChaîne(PmenuC,1,".")


FOR i=1 TO Dimension({pTableau,indVariable})/2
	{PmenuC,indChamp}..Libellé = {pTableau,indVariable}[i,2]
	{PmenuC,indChamp}..Message = {pTableau,indVariable}[i,1]
	MenuAjoute(pMenu,{Xlt_menu,indChamp},-1)
END


En fait la difficulté était d'assigner une fonction au menu créé c'est pour cela que j'utilise Message.

PmenuC est un un simple menu contextuel, qui lorsqu'on le sélectionne va lire Message pour connaitre l'action qu'il doit faire.


La fonction MenuAjoute existe depuis la version 10.

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=19&topic_id=6014&post_id=24233