Hola.
No entiendo. ¿ Tenes las teclas de cursor desactivadas ?
Quizá me equivoque, pero si lo que buscas es detectar si una tecla de cursor fué presionada y accionar según cuál haya sido, podrías hacer
algo parecido a:
Código Delphi
[-]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_LEFT: if PosX > 1 then Dec(PosX);
VK_RIGHT: if PosX < MAX_X then Inc(PosX);
VK_DOWN: if PosY > 1 then Dec(PosY);
VK_UP: if PosY < MAX_Y then Inc(PosY);
...
end;
end;
Saludos.