[richy08]

gracias dec por responder utilizo este codigo para versi reacciona los eventos con las teclas pero no hace nada

Código Delphi [-]
procedure TFrm_GraRes.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if key=char(37) then
  begin
     showmessage('37');
  end;

  if key=char(38) then
  begin
           showmessage('38');
  end;

  if key=char(39) then
  begin
          showmessage('39');
  end;

  if key=char(40) then
  begin
      showmessage('40');
  end;
end;