navegando pelos edits

04/01/2006

para navegar pelos edits para frente eu utilizo o seguinte codigo
a cada vez que o usuario aperta enter ele vai para o proximo edit seguindo a ordem de tab order

  if key = #13 then
    begin
      Key := 0;
      Perform(WM_NEXTDLGCTL, 0, 0);
    end;


como faço para voltar para tras?

[]s


Fernando_cunha

Respostas

04/01/2006

Rômulo Barros

[b:8e5fc7afa6]Faz Assim:[/b:8e5fc7afa6]

  if key = #13 then 
    begin
      Key := 0;
      Perform(WM_NEXTDLGCTL, -1, 0);
    end;



Responder Citar