警告音？を消す方法は？

あー  2007-02-04 13:24:07  No: 24776  IP: 192.*.*.*

Editに入力された内容を、キーボードのエンターを押した時に空にする場合
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = Char(VK_RETURN) then Edit1.Clear;
end;
とすると、エンターを押す度にｗｉｎｄｏｗｓの確認音？というか警告音が
毎回鳴ります。煩わしいので警告音を無くしたいんですけど何かいい方法はないですか？

編集 削除
かみづ  2007-02-04 14:07:25  No: 24777  IP: 192.*.*.*

Key := #0;を追加したらどうでしょう。

編集 削除