Damit unterdrückst Du das Soundevent (steht in der Code Library oder so)
Delphi-Quellcode:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
var mgsTemp: TMsg;
begin
if Key = VK_RETURN then PeekMessage(mgsTemp, 0, WM_CHAR, WM_CHAR, PM_REMOVE)
end;