Problema para mudar de foco

[bnobre]

Olá a todos,

Estou com um problema. Possuo uma tela de fechamento de venda, com alguns JvCalcEdits para preenchimento da forma de pagamento, Dinheiro, Cartão, dentre outros, conforme anexo.

Preciso navegar entre os JvCalcEdits (biblioteca Jedi atualizada) usando as teclas direcionais, então basicamente fiz o código abaixo, no evento OnKeyDown:

Citar

//Exemplo no calc2

if key = 38 Then
       calc1.SetFocus
  else
  if key = 40 Then
    calc3.SetFocus;

O problema é que o foco vai para o componente em questão (como deve ser) e depois simplesmente volta para o calc2, sem mais nem menos. Isso também ocorre com o TCurrencyEdit (antigo RxLibrary). Uso o Delphi 2010. Com o TEdit tradicional do Delphi funciona sem problemas.

Alguém saberia como contornar isso?

Desde já agradeço a atenção de todos

Editado 8 Novembro, 2016 por doidopb

[Daniel Simoes]

Experimente atribuir "0" ao Key, para que o Delphi não tente processá-lo
 

no final do seu evento...

Key := 0

[bnobre]

Perfeito Daniel,

Mas uma vez muito obrigado.