FoxPro/Visual FoxPro - Capturar Eventos!!! Urgente!!!

 
Vista:

Capturar Eventos!!! Urgente!!!

Publicado por Martín R. Comparetto (67 intervenciones) el 18/12/2001 16:35:35
Hola a todos!!!
Mi problema es que no puedo capturar un evento de una dll.
Tengo una dll generada en VB, que abre un form en donde hay unos botones que ejecutan un evento. Mi pregunta es, como se puede agregar un codigo al evento de la dll para que este se ejecute. Estoy trabajando con VFP7. Hay una funcion (nueva) EVENTHANDLER que relaciona los eventos, pero no puedo hacerla funcionar. El código que tengo es este:
PUBLIC oMenuActiveX
PUBLIC oMyMenu

oMyMenu = NEWOBJECT( "MyMenu" )
oMenuActiveX = NEWOBJECT( "MenuActX.clsMenu" )
llRe = EVENTHANDLER( oMenuActiveX, oMyMenu )
IF !( llRe )
= MESSAGEBOX( "Error" )
ENDIF
oMenuActiveX.Iniciar()
RELEASE oMenuActiveX, oMyMenu
RETURN ( .t. )

DEFINE CLASS MyMenu as Custom
PROCEDURE Init()
= MESSAGEBOX( "MyMenu::Init()" )
ENDPROC
IMPLEMENTS clsMenu IN "MenuActX.exe"
PROCEDURE clsMenu_Iniciar()
= MESSAGEBOX( "clsMenu::Iniciar" )
PROCEDURE clsMenu_DispararEvento()
= MESSAGEBOX( "clsMenu::DispararEvento" )
ENDDEFINE

Esto esta bien??? el formulario me lo ejecuta, pero los eventos no..
Muchas gracias!!! Felices Fiestas =)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder