Button überspringt OnKeyDown bei VK_Up / VK_Down

[Aike]

Hallöchen,

ich musste gerade verwundert feststellen, dass ich meine Buttons zwar durchlaufen kann mit VK_Up und VK_Down, aber wenn ich möchte, dass bei OnKeyDown der Knopf gedrückt werden soll, geht das nicht. Um genauer zu sein:
Ich habe eine Liste von 5 Buttons in der Vertikalen. Wenn ich nun den obersten Knopf gedrückt habe, möchte ich, dass, wenn ich die Pfeiltaste nach unten drücke, der Button darunter gedrückt und fokusiert wird.

Code-Schnipsel:

Delphi-Quellcode:

procedure TForm1.Button1KeyDown(Sender: TObject; ...);
begin
  ShowMessage('');
  if Key=VK_Down then
  begin
    ButtonDarunterAnvisieren;
  end;
end;

Es wird nichtmal die ShowMessage angezeigt, wenn ich die Pfeiltasten benutze. Mit Buchstaben funktioniert es natürlich einwandfrei.

Habt ihr eine Idee, wie ich das abfangen kann?

Liebe Grüße ...