Oliver
23 de Noviembre del 2003

Necesito evitar que se pueda copiar, pegar y cortar en un textbox. Esto es para hacer un textbox para passwords.

Desde ya muchas gracias.

Oliver

Miguel
23 de Noviembre del 2003

En el load del formulario create el siguiente 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"


Y en el RigthClickEvent la siguiente llamada al menú

ACTIVATE POPUP mPoPup AT mrow(),mcol()