FoxPro/Visual FoxPro - Menu Contextual

Alguien tiene algo para ver como se hacen los menu contextuales que aparecen con el boton derecho del mouse.

Gracias.

En el evento RightClick utiliza el siguiente codigo, este te presenta dos opciones pero tu puedes poner todas las que quieras

DEFINE POPUP pMttoSuministros FROM MROW(), MCOL() MARGIN SHORTCUT SHADOW
DEFINE BAR 1 OF pMttoSuministros PROMPT "\<Insertar Suministro"
DEFINE BAR 2 OF pMttoSuministros PROMPT "\<Anular Suministro"

ON SELECTION POPUP pMttoSuministros _Screen.ActiveForm.MttoSuministros(BAR())

ACTIVATE POPUP pMttoSuministros
RELEASE POPUP pMttoSuministros

Donde MttoSuministros es un Metodo creado por el usuario con los diferenets procedimientos a utilizar

suerte!!!

Para que complicarse tanto si lo puedes hacer con el asistente?
Despues en un formulario en el evento RightClick escribes:

**** para ejecutar un menu contextual
Do Mimenu.mpr