Gestion Dynamique du click sur Menu Dynamique

Question

Bonjour, Voila j'ai cr&#233;&#233; des menus dynamiquement &#224; partir d'une base de donn&#233;es (en Visual Basic 6).
Je
g&#232;re les clicks sur les menus deroulants avec setwindowlong mais le
probl&#232;me est en mode deboggage qui est pratiquement impossible si cette
API "setwindowlong" est lanc&#233;.
(Point Arret VB fait planter tout !!!).


Alors quelques explications ....

Dans mon MDIForm_Load, A partir d'une base de donnees j'insere mes
menus principaux avec la commande "Rec = InsertMenu(...)" et ensuite
des menus popup (si je clique sur les menus principaux) grace a la
commande "retval = InsertMenuItem(...)".



Ensuite pour declencher les clicks sur ces menus nouvellement cre&#233;s je
lance apres la construction de tous les menus la commande suivante :

"trueWndProc = SetWindowLong(Me.hwnd, GWL_WNDPROC, AddressOf WindowProcMenu)"

    

Et WindowProcMenu est de la forme :

'*************************************************************

    Public Function WindowProcMenu(ByVal hwnd As Long, ByVal uMsg As Long, ByVal wParam  As Long, ByVal lParam As Long) As Long



On Error GoTo FinSub



If uMsg = WM_COMMAND Then

    Select Case wParam

            Gestion clic utilisateur

    end select

end if


WindowProcMenu = CallWindowProc(trueWndProc, hwnd, uMsg, wParam, lParam)

'****************************************************************

Voila !!!! 

Mais le probleme est que le deboggage est impossible (enfin le point
d'arret fait planter toute l'appli!!!) et de plus dans certains cas
l'acces au code est impossible sur un point d'arret.



Si vous avez une id&#233;e, merci de me la faire parvenir .....

Merci d'avance bonne journ&#233;e

cs_DARKSIDIOUS · Answer

Va voir ma source http://www.vbfrance.com/codes/MENU-CREE-DYNAMIQUEMENT-SANS-PASSER-ASSISTANT-VB_27410.aspx Elle permet de créer des menus popup dynamiquement sans à avoir à créer une fonction pour chaque événements. => pas besoin de setwindowlong _ Avant de poster dans le forum, prière d'aller lire ceci : http://www.codes-sources.com/reglement.aspx

cs_cricri95 · Answer

Merci, mais cela ne marche pas si on a des menus rattaches a un menu principal en fait mon MDIFORM_Click, MDIFORM_MouseDown ou MDIFORM_MouseUp ne se d&#233;clenche pas.
La diff&#233;rence : mes menus sont deja construits au moment de l'ouverture de l'appli.

Si Quelqu'un a une id&#233;e ???

Gestion Dynamique du click sur Menu Dynamique

2 réponses

Discussions similaires