FoxPro/Visual FoxPro - EVITAR SALIR DEL MENU

   
Vista:

EVITAR SALIR DEL MENU

Publicado por Mario Serna Lopez (21 intervenciones) el 03/10/2010 21:18:27
TENGO UN MENU PRINCIPAL CON VARIAS OPCIONES.
EL PROBLEMA QUE TENGO ES QUE DESPUES DE CONVERTIRLO EN UN ARCHIVO .EXE, CUANDO PRESIONO EL MOUSE EN CUALQUIER PARTE DE LA PANTALLA -MENOS EN LAS OPCIONES- PROVOCA QUE ME SALGA DEL MENU.

AGRADECERIA ME DIJERA ALGUIEN QUE INSTRUCCION COLOCO PARA EVITAR ESTA SITUACION.

YA PROBE CON ON KEY LABEL ESC KEYBOARD CHR(13) SIN RESULTADOS
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

RE:EVITAR SALIR DEL MENU

Publicado por hancito2003 (54 intervenciones) el 04/10/2010 23:03:25
Probablemente hayas diseñado las capturas de tu menu con PROMPT y no le has quitado las funciones al mouse. Considera utilizando las opciones de MENU POPUP, que te permite capturas con el mouse.

Cuando utilizas opciones como el IF ... ELSE...ENDIF..., tambien te suceden esas cosas, porque especificas:

IF tal cosa
realiza esta operacion
ELSE
RETURN()
ENDIF

Al utilizar ELSE (que significa en caso contrario), y das click con el mouse, entonces se esta ejecutando el caso contrario.

Lo mismo sucede con las capturas con el PROMPT.

Prueba utilizando este tipo de menu a ver si te sirve:

SET ESCAPE OFF

DEFINE MENU PRINCE BAR AT LINE 1
DEFINE PAD MANTPAD OF PRINCE PROMPT 'Operaciones

ON PAD MANTPAD OF PRINCE ACTIVATE POPUP MANTPOP

DEFINE POPUP MANTPOP MARGIN RELATIVE SHADOW
DEFINE BAR 1 OF MANTPOP PROMPT 'Expedientes '

ON SELECTION BAR 1 OF MANTPOP DO MANIF

ACTIVATE MENU PRINCE

IF LASTKEY()=27
RETURN
ENDIF

Luego al ejecutar cada procedimiento dentro de tu programa, lo comienzas con:
HIDE MENU ALL
HIDE POPUP ALL

y para retornar al menu principal, solo utilizas el RETURN conocido.

El numero de lineas en LINE debe aumentar con las opciones de tu menu.

Espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar