Eliminar beep en OnKeyDown al usar VK_RETURN
 

Nota: no es una pregunta en si misma, porque de alguna manera lo solucioné.

Hace un tiempo escribí un programa del que no me di cuenta de una característica: El siguiente código hace que suene un beep en Windows

Código Delphi [-]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Key=VK_RETURN then Button1.Click;
end;

Usaba Windows sin sonidos y de ahí que este detalle se me había pasado... es espantoso ese comportamiento.

El "ruidito" lo termine sacando implementando lo siguiente:

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if Key=#13 then Key:=#0
end;

Espero que le sirva a alguien. Disculpen si ya figuraba en el foro, no lo pude encontrar en mis búsquedas.

Hola,

Se agradece el aporte. No obstante, sabe que existe un apartado para trucos en el ClubDelphi.

Lo digo porque, en mi opinión bien podrías haberlo publicado ahí. Bueno, todavía estás a tiempo. ;)