lästiges beepen abstellen ??

[Ron67]

Hallo zusammen, ich habe etwas ähnliches.

Bei mir gibt es u.a. zwei Edit-Felder. Meistens füllt man nur das zweite aus. Daher hat das erste Editfeld kein Tabstob
Mit der Tastenkombination Alt + V soll der Fokus aber auf das erste Edit-Feld gelegt werden.

Im FormCreate habe ich schon
KeyPreview := True;

Dann habe ich:

Code:

procedure TMedikation.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  Mgs: TMsg;
begin
  if (ssAlt in Shift) and (Key = 86) then
  begin
    //ShowMessage('Alt + V');
    PeekMessage(Mgs, 0, WM_SYSKEYUP, WM_SYSKEYUP, PM_REMOVE);
    Key := 0;
    //shift := [];
    edtVorpraeparat.SetFocus;
  end;
end;

WM_CHAR geht nicht, WM_SYSKEYDOWN auch schon probiert(mit FormKeyDown)

Was ist falsch?