Menu inicio
Es simple lo que quieres LIZ.
Haz lo siguiente.
Pon este código en el evento Click del botón.
SET SHADOW ON
DEFINE POPUP OpPopup ;
FROM MROW(), MCOL() ;
MARGIN SHORTCUT && agregar sombra (jd 06/20/96)
DEFINE BAR 1 OF OpPopup PROMPT " Imprimir Lista de articulos "
DEFINE BAR 2 OF OpPopup PROMPT " Imprimir Lista de articulos con costo "
DEFINE BAR 3 OF OpPopup PROMPT "-"
DEFINE BAR 4 OF OpPopup PROMPT " Imprimir Lista de prodcutos con Stock minimo "
ON SELECTION POPUP OpPopup _screen.activeform.u_OpPopup(BAR())
ACTIVATE POPUP OpPopup
RELEASE POPUP OpPopup
Ahora crea un método en tu formulario con el nombre u_OpPopup y dentro de este pega lo siguiente.
Para xbar
Do Case
Case xbar = 1
wait wind "opcion 1"
Case xbar = 2
wait wind "opcion 2"
** el 3 es una raya
Case xbar = 4
wait wind "opcion 4"
EndCase
Dendro de casa CASE yo he mostrado un wait, tu puedes llamar a o tro método.
FÁCIL vez eso lo hice desde la version 5, ahora estoy probando la 9.0 esta buena.
Ojala te sirva, la variantes son tuyas
Si usas múltiple formularios hay que hacer una corrección (me avisas)
Saludos
Hubert Casimiro.
Haz lo siguiente.
Pon este código en el evento Click del botón.
SET SHADOW ON
DEFINE POPUP OpPopup ;
FROM MROW(), MCOL() ;
MARGIN SHORTCUT && agregar sombra (jd 06/20/96)
DEFINE BAR 1 OF OpPopup PROMPT " Imprimir Lista de articulos "
DEFINE BAR 2 OF OpPopup PROMPT " Imprimir Lista de articulos con costo "
DEFINE BAR 3 OF OpPopup PROMPT "-"
DEFINE BAR 4 OF OpPopup PROMPT " Imprimir Lista de prodcutos con Stock minimo "
ON SELECTION POPUP OpPopup _screen.activeform.u_OpPopup(BAR())
ACTIVATE POPUP OpPopup
RELEASE POPUP OpPopup
Ahora crea un método en tu formulario con el nombre u_OpPopup y dentro de este pega lo siguiente.
Para xbar
Do Case
Case xbar = 1
wait wind "opcion 1"
Case xbar = 2
wait wind "opcion 2"
** el 3 es una raya
Case xbar = 4
wait wind "opcion 4"
EndCase
Dendro de casa CASE yo he mostrado un wait, tu puedes llamar a o tro método.
FÁCIL vez eso lo hice desde la version 5, ahora estoy probando la 9.0 esta buena.
Ojala te sirva, la variantes son tuyas
Si usas múltiple formularios hay que hacer una corrección (me avisas)
Saludos
Hubert Casimiro.
1 Respuesta
Respuesta de hubertc
1