Einzelnen Beitrag anzeigen

hathor
(Gast)

n/a Beiträge
 
#11

AW: Application.Messagebox erzeugt Standardton

  Alt 24. Jun 2012, 19:56
AFAIK ist das eine generelle Einstellung in den Soundoptionen der Systemsteuerung. Ich wüsste nicht, dass man den Beep gezielt im Einzelfall abstellen könnte und konnte auch auf die Schnelle keine diesbezügliche Aussage finden, geschweige denn irgendwelchen Code.
Kann es mit WIN 7 nicht testen: Application.MessageBox ist stumm.

Delphi-Quellcode:
//Beep Off
SystemParametersInfo(SPI_SETBEEP, Word(False), nil, 0);
if Application.MessageBox('Eingabeliste komplett leeren?', 'Bestätigungsabfrage', mb_yesno) = id_yes then BEGIN END;
//Beep On
SystemParametersInfo(SPI_SETBEEP, Word(true), nil, 0);
  Mit Zitat antworten Zitat