Windows Error Ton bei Programmstart

[littleDave]

Wenn ich ein Edit-Feld so "erweitere", dass mit einem Druck auf "Enter" der dazugehörige Button gedrückt wird, kommt normalerweise auch dieser Ton.
Ich regel das meistens über das OnKeyPress-Event, dann da kann ich das Beepen unterdrücken:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
  begin
    Key := #0; // <---- "Beep" vermeiden
    Button1.Click;
  end;
end;

Jedoch höre ich das Beepen auch, wenn ich das Programm im Debuger laufen lasse, daher weiß ich nicht, ob dir das hilft.