Problem mit KeyDown

[_frank_]

ich hab mir ein Control von TCustomControl abgeleitet und da KeyDown überschrieben.
leider wird meine methode nicht aufgerufen (wurde nicht wegoptimiert).
es kommen keine Compilerfehler/warnungen. TWinControl.KeyDown (die ursprungsmethode) wird aufgerufen nur meine nicht.

Delphi-Quellcode:

  TBlah=class(TCustomControl)

  protected
    procedure KeyDown(var Key: Word; Shift: TShiftState);override;
  end;

...

procedure TBlah.KeyDown(var Key: Word; Shift: TShiftState);
begin
  showmessage('keydown');
  inherited;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  with TBlah.create(self) do
  begin
    parent:=self;
    top:=0;
    left:=0;
    width:=100;
    height:=100;
  end;
end;

hat jemand eine Idee, was ich falsch mache?

Gruß Frank