Komisches Geräusch ebi Edit1KeyDown

[Green]

ich hab folgendes in KeyDown eines Edits:

Delphi-Quellcode:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if shift = [ssCtrl] then
    if key = ord('K') then begin
      TEdit(Sender).Text := TEdit(Sender).Text + #3;
      TEdit(Sender).SelStart:=length(TEdit(Sender).text);
      end;
  if key = VK_RETURN then
    Button1Click(Sender);
end;

und immer wenn ich zum beispiel Strg + K oder Enter drücke kommt so ein Geräusch, wie der Warnton von Win wenn n fehler kommt, kann mir jemand erklären wie ich des abstell??