Prezados,
Fiz assim e funcionou.
!!CB!! 173
Data Field: df1
On VTM_KeyUp
If wParam = VK_Enter
Call SalStatusSetText( hWndForm, "Enter pressionado no df1" )
Em 30/03/07, Jose Carlos de Godoi e Silva <[EMAIL PROTECTED]> escreveu:
Ok Júnior,
tentei assim, com VTM_KeyUp e não funcionou. Vou tentar novamente.
Muito obrigado pela ajuda.
Godoi
"Junior" <[EMAIL PROTECTED]>@virtualand.net em 30/03/2007 16:14:27
Favor responder para [email protected]
Enviado Por: [EMAIL PROTECTED]
Para: <[email protected]>
cc:
Assunto: RES: [sqlwin] Enter
Olá Godói,
Para identificar quando a tecla pressionada é o enter.
O evento disparado quando se tecla o enter, é o VTM_KeyUp ou WM_KeyUp.
Por exemplo:
On VTM_KeyUp ou WM_KeyUp
If wParam = 13
Call SalTblSetContext( tbl1, VisTblFindString( tbl1, 0,
SalTblGetColumnWindow( tbl1, 2, COL_GetPos ),dfPesquisa )
)
Call SalHideWindow( dfPesquisa )
Um abraço, Junior.
-----Mensagem original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
nome de Junior
Enviada em: sexta-feira, 30 de março de 2007 15:13
Para: [email protected]
Assunto: RES: [sqlwin] Enter
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 [email protected]
Enviado Por: [EMAIL PROTECTED]
Para: <[email protected]>
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: [email protected]
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: [email protected]
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)
==============================================
==============================================
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)
==============================================
--
Lairton N de Almeida Jr.
[EMAIL PROTECTED]
