Boa Tarde !!!
Quando você tecla enter a variável wParam = 13 faça um teste acho que
funciona.
On VTM_KeyDown
If wParam = 13
Call SalTblSetContext( tbl1, VisTblFindString( tbl1, 0,
SalTblGetColumnWindow( tbl1, 2, COL_GetPos ),
dfPesquisa ) )
Call SalHideWindow( dfPesquisa )
Olá Batista,
Seguí sua dica e funcinou. Só que ainda não consigo identificar quando a
tecla pressionada é o enter.
Sabe como fazer?
Muito obrigado,
Godoi
"Antonio Baptista" <[EMAIL PROTECTED]>@virtualand.net em 30/03/2007
13:08:54
Favor responder para sqlwin@virtualand.net
Enviado Por: [EMAIL PROTECTED]
Para: <sqlwin@virtualand.net>
cc:
Assunto: RE: [sqlwin] Enter
Tente usar o seguinte
On SAM_AppStartup
Call SalMapEnterToTab(TRUE)
E quando não precisar
Call SalMapEnterToTab(FALSE)
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em
nome de Jose Augusto S. Oliveira
Enviada: sexta-feira, 30 de Março de 2007 15:38
Para: sqlwin@virtualand.net
Assunto: RES: [sqlwin] Enter
Tente usar VTM_KeyUp
Number: VTM_KeyUp = 0x0101
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em
nome de Jose Carlos de Godoi e Silva
Enviada em: sexta-feira, 30 de março de 2007 10:37
Para: sqlwin@virtualand.net
Assunto: [sqlwin] Enter
Caros Centuriões,
Estou necessitando detectar o momento em que o usuário digita um enter no
datafield.
Tentei usar o evento On VTM_KeyDown, como abaixo, mas quando digito o enter
o evento não é acionado.
Alguém poderia me ajudar?
Muito obrigado,
Godoi
!!CB!! 173
On VTM_KeyDown
If wParam = VK_Enter
Call SalTblSetContext( tbl1, VisTblFindString( tbl1, 0,
SalTblGetColumnWindow( tbl1, 2, COL_GetPos ),
dfPesquisa ) )
Call SalHideWindow( dfPesquisa )
OBSERVAÇÃO:
A ITAIPU esclarece que, por força de seu Estatuto, a presente
mensagem não implica a assunção de obrigações em seu nome.
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
OBSERVAÇÃO:
A ITAIPU esclarece que, por força de seu Estatuto, a presente
mensagem não implica a assunção de obrigações em seu nome.
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
