Auf Pfeiltasten reagieren

[Peter_Panther]

danke fuer die vielen antworten (man ging das schnell

aber irgendwie will der bei mir nicht ?!

Code:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
  public
  Procedure FormKeyPress(Sender: TObject; Var Key: Char);
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

Procedure TForm1.FormKeyPress(Sender: TObject; Var Key: Char);
  Begin
    If Key = 'a' Then ShowMessage('Das Kleine a wurde gedrückt');
  End;

end.

was mach ich falsch ?