[pampitasnowman]

Hola a todos! Estoy con una aplicación en Delphi 7, y necesito asignarles a dos BitBtn, las teclas de flecha izquierda y derecha respectivamente. Probé con la función onKeyPress del Form principal en donde están estos dos BitBtn:

Código Delphi [-]
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then
   bitbtn1Click(bitbtn1);
end;

En el ejemplo tengo la tecla enter (#13), y con eso funciona perfecto, le asigno letras de teclado alfabético y también funciona, pero cuando les pongo las flechas izquierda y derecha (#37 y #39), no sucede nada.
El form principal tiene la propiedad:

Código Delphi [-]
KeyPreview := True;

Muchas gracias por su tiempo, saludos!