[[enecumene]]

un ejemplo:

Código Delphi [-]
begin
  if Key=VK_TAB then
    begin
       Edit2.setfocus;
    end;
  end;

Saludos.