In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Hola a todos
Estoy realizando un modulo que necesito que se procese la tecla pulsada y
observo que cuando pulso una tecla se ejecuta dos veces el METHOD
MaskEdit1KeyDown( oSender, nKey, nFlags ) CLASS TForm1
Pongo un ejemplo de prueba
Gracias
Pepe
Solo agrega Return .f.
asi es como va
METHOD MaskEdit1KeyDown( oSender, nKey, nFlags ) CLASS TForm1
If nKey == VK_UP
MsgAlert("Pulsacion VK_UP")
return .f.
ElseIf nKey == VK_DOWN
MsgAlert("Pulsacion VK_DOWN")
return .f.
EndIf
RETURN Nil
Pedro gracias por tu ayuda ahora funciona Ok
Un saludo
Pepe
"Pedro de Leon Rodas" <pedro_deleon@hotmail.com> escribió en el mensaje
news:[email=463d2d79@ozsrv2.ozlan.local...]463d2d79@ozsrv2.ozlan.local...[/email]
> Solo agrega Return .f.
>
> asi es como va
>
> METHOD MaskEdit1KeyDown( oSender, nKey, nFlags ) CLASS TForm1
> If nKey == VK_UP
> MsgAlert("Pulsacion VK_UP")
> return .f.
> ElseIf nKey == VK_DOWN
> MsgAlert("Pulsacion VK_DOWN")
> return .f.
> EndIf
> RETURN Nil
>
