Page 1 of 1

ANTONIO, AYUDAME COM VK_ESCAPE + BUTTON NO LOGRO EXITO.

Posted: Sat Jun 09, 2007 2:47 pm
by laugusto
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,

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

oBtn[ 1 ]:nDlgCode := DLGC_WANTALLKEYS

vk_escape + button

Posted: Sat Jun 09, 2007 11:20 pm
by laugusto
Gracias Antonio,

Funcionou de pronto!

Saludos,