Delphi - Utilizar las teclas cursor

Hola amigos del foro

Estoy haciendo un programa delphi7 en el que estoy usando barios Edits y el problema es que no quiero utilizar el ratón ni la tecla tab para pasar de un Edit a otro Edit quiero que pase con las tecla cursor es decir con las teclas flecha arriba, abajo, izquierda y derecha no se si se puede hacer eso

De ante mano les agradezco mucho

Saludos

Usando el evento OnKeyDown

procedure TForm1.Edit1KeyDown( Sender : TObject; var Key : Word;
Shift : TShiftState );

Const
Msp_Teclado_FlechaIzq =37;;
Msp_Teclado_FlechaArriba =38:
Msp_Teclado_FlechaDer =39;
Msp_Teclado_FlechaAbajo =40;
begin
case key of
Msp_Teclado_FlechaIzq : Edit2.SetFocus;
Msp_Teclado_FlechaArriba : Edit5.SetFocus;
Msp_Teclado_FlechaDer : Edit3.SetFocus;
Msp_Teclado_FlechaAbajo : Edit4.SetFocus;
end;
end;

Aqui te dejo el ejemplo completo Delphi 7 http://www.tecnologiamsp.com/delphi/Flechas.zip