Page 1 of 1

VK_ESCAPE em Button

Posted: Fri Jun 08, 2007 11:55 pm
by laugusto
Buenas Noites,

Antonio, estou com o seguinte problema em um BUTTON

REDEFINE BUTTON oBtn[ 1] ID 635 OF oMap30;
ACTION( pPR_A_COD := TMP1,;
TESTE2( oWnd, oAgen, oMap30, pPR_A_COD ) )

oBtn[ 1]:bKeyDown := { |nKey| IF( nKey = VK_ESCAPE,( Ver_Tecla1() ), nil ) }

Gostaria de usar a TECLA ESCAPE, mas não FUNCIONA de jeito nenhum, estou compilado com FWH2.7 + harbour46.
Poderia me ajudar me dizendo como posso fazer o ESCAPE funcionar ?

Gracias de Antemano,

Luiz Augusto
São José dos Pinhais - PR
Brasil

VK_ESCAPE em Button

Posted: Sat Jun 09, 2007 12:11 pm
by laugusto
Disculpa si no es mui bueno mi espanhol, necesito de capturar el
VK_ESCAPE en um button, vea abajo el ejemplo:

REDEFINE BUTTON oBtn[ 1] ID 635 OF oMap30;
ACTION( pPR_A_COD := TMP1,;
TESTE2( oWnd, oAgen, oMap30, pPR_A_COD ) )

oBtn[ 1]:bKeyDown := { |nKey| IF( nKey = VK_ESCAPE,( Ver_Tecla1() ), nil ) }

no logro exito, podem me ajudar?

Gracias de Antemano,

[]´s

Posted: Sat Jun 09, 2007 6:44 pm
by Antonio Linares
#define DLGC_WANTALLKEYS 4

oBtn[ 1 ]:nDlgCode := DLGC_WANTALLKEYS