Voltar foco para componente anterior

31/08/2004

Pessoal para mudar o foco para o proximo componente eu coloco o seguinte codigo

begin
// APERTANDO ENTER MANDA FOCO PARA PROXIMO COMPONENTE
if Key = VK_RETURN then
Perform(Wm_NextDlgCtl,0,0);
end;

Ate ai tudo bem ele pega o proximo componente que esta definido no tabOrder e manda o foco, so que estou precisando voltar para o componente anterior e nao achei nenhuma function que faca isso igual a definida ai em cima, alguem sabe como eu faco para voltar para o componente anterior sem ter que especificar manualmente todos os componentes tipo...

componente.setfocus;
componente.setfocus;
componente.setfocus;

E sim uma funcao que pegaria no tabOrder o anterior e mandasse o foco, pq assim eu faco em um e os outros eu herdo o evento nao precisando ficar digitando digitando... Caso alguem nao entende a duvida eu posso reformular ela...

Muito Obrigado

Renato


Renato_sp

Respostas

31/08/2004

Ipc$

Perform(WM_NEXTDLGCTL,-1,0);


Responder Citar

31/08/2004

Renato_sp

Valeuuuu deu certo.. eu dei uma olhada no help e nao consegui localizar ele, tem algum mais no help sobre determinado comando?

Valeu...


Responder Citar