menús boton derecho

Ktm
03 de Noviembre del 2003
Buenas.
Me gustaria saber como puedo hacer que en un combo o un textbox al pulsar el botón derecho me salga un menú para agregar nuevas entradas en una tabla.
Muchas gracias.

Miguel
03 de Noviembre del 2003
En el evento RighClictEvent del textbox activa el menú:

ACTIVATE POPUP mPoPup AT mrow(),mcol()

y en el load del formulario crea el menú

DEFINE POPUP mPoPup SHORTCUT RELATIVE
DEFINE BAR _med_cut OF mPoPup PROMPT "Cor<tar" ;
KEY CTRL+X, "Ctrl+X" ;
MESSAGE "Cortar el texto al portapapeles"
DEFINE BAR _med_copy OF mPoPup PROMPT "<Copiar" ;
KEY CTRL+C, "Ctrl+C" ;
MESSAGE "Copia el texto al portapapeles"
DEFINE BAR _med_paste OF mPoPup PROMPT "<Pegar" ;
KEY CTRL+V, "Ctrl+V" ;
MESSAGE "Pega el texto al cortapapeles"
DEFINE BAR _med_slcta OF mPoPup PROMPT "Se<lecciona Todo" ;
KEY CTRL+A, "Ctrl+A" ;
MESSAGE "Selecciona todo el texto"

En este caso es un menú para Copiar/Cortar/Pegar, pero si quieres hacer otra cosa es bien sencillo prográmatelo en la opción deseada.

Salu2


ktm
03 de Noviembre del 2003
Muchas gracias Miguel. He probado y me sale, pero como puedo hacer para que cuando clickeo en una opción se abra otro formulario?