salir de un TEDIT con flecha abajo

[KAYO]

He intando de multiples formas salir de un componente Tedit con felcha abajo y no logro la solucion.... con lo último que intenté fue con esto y nada:

En la propiedad de KeyPreview de la forma la puse en true y en el evento OnKeyPress del TEDIT puse esto:


procedure TFMantenimientoArticulos.EdFiltroKeyPress(Sender: TObject;
var Key: Char);
begin
if key = chr(24) then GSQL.SetFocus

else if key = chr(13) then BtAceptar.Click;
end;


Agradezco nuevamente vuestra ayuda

[vtdeleon]

Saludos

Prueba el eventeo Onkeydown

Código Delphi [-]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_DOWN then
    Edit2.SetFocus;

[KAYO]

AGRADECIDO!!!!.... otro problema solucionado