Setar Foco no KeyPress =Enter
Como faço pra trocar o foco do objeto quando o usuário pressionar Enter ?
Ederbond
Curtidas 0
Respostas
Lucas Silva
22/01/2004
no evento onKeyPress coloque....
if key = #13 then // 13 é o enter! componente.SetFocus;
GOSTEI 0
Allankna
22/01/2004
Para vc mudar o foco de um componente ao precionamento da tc enter proceda da seguinte forma.
Vá no evento do componete e procure pelo evento onKeyPress
nele coloque o seguinte código:
[b:88f1c521ec]if Key = #13 then[/b:88f1c521ec] //teste se foi pressionado enter
[b:88f1c521ec]begin[/b:88f1c521ec]
[b:88f1c521ec]Key := 0;[/b:88f1c521ec] //suprime o beep e retorna o valor da variavel key para 0
[b:88f1c521ec] Perform(WM_NEXTDLGCTL, 0, 0); [/b:88f1c521ec]//esta linha faz com que o foco mude para o próximo componente do form
[b:88f1c521ec]end;[/b:88f1c521ec]
se quiser te mando um exemplo pratico
mande um e-mail morpheus_1977@hotmai.com
Até mais,
Não sei se respondi a sua dúvida
Vá no evento do componete e procure pelo evento onKeyPress
nele coloque o seguinte código:
[b:88f1c521ec]if Key = #13 then[/b:88f1c521ec] //teste se foi pressionado enter
[b:88f1c521ec]begin[/b:88f1c521ec]
[b:88f1c521ec]Key := 0;[/b:88f1c521ec] //suprime o beep e retorna o valor da variavel key para 0
[b:88f1c521ec] Perform(WM_NEXTDLGCTL, 0, 0); [/b:88f1c521ec]//esta linha faz com que o foco mude para o próximo componente do form
[b:88f1c521ec]end;[/b:88f1c521ec]
se quiser te mando um exemplo pratico
mande um e-mail morpheus_1977@hotmai.com
Até mais,
Não sei se respondi a sua dúvida
GOSTEI 0
Nigro
22/01/2004
Apenas para concluir, verifique a propriedade tabOrder de todos os componentes.
ahhh e TabStop também
ahhh e TabStop também
GOSTEI 0