Tabstop & Pfeiltasten

[gtom]

Habe das mal getestet:

ein Formular mit 3 Edit.Controls + 1 RadioGroup mit 2 Items
Form1.KeyPreview:= True;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_LEFT then Beep;
if Key = VK_Right then Beep;
Key:= 0; { Key was handled }
end;

Wenn ein Edit-Control den Focus hat kommt dort kein KeyDown an und es ertönt der Beep! Wie gewünscht!

Wenn die Radio-Group den Fokus hat schaltet die bei VK_LEFT/RIGHT um und es kommt kein Beep.
D.h. der KeyDown Event wird scheinbar VOR OnKeyDown des Formulars von der RadioGroup verarbeitet...

Wie kann ich das lösen?