Wieso gibt es bei dem Code einen Beep-Ton

[Alallart]

Weiß jemand wieso man bei diesem Code ein Beep, bzw. Bling hört?
Kann man das abstellen?

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = Chr(VK_RETURN) then
    Self.Perform(WM_NEXTDLGCTL, 0, 0);
end;

Eingebettet ist der Code in einem Editfeld. Bei Eingabe von Enter springt der Fokus zum nächsten Element.