Hallo Freunde,
möchte noch Kleinigkeiten verbessern und habe noch keine befriedigende Lösung bzw. komme mit einer Pascal-Syntax nicht zurecht.
Die Aufgabe ist eigentlich ganz einfach. Ich möchte den (manchmal) lästigen Piep-Ton (Beep) unterdrücken, bzw. ein- ausschalten. Dazu gebe ich normale Hinweis- oder Fehlermeldungen in meinem Programm in einer eigenen Fehlermeldezeile aus. Der Anwender kann unter Einstellungen festlegen, ob diese Fehlermeldungen zusätzlich mit Ton (Beep) zu hören sein sollen oder nicht (funktioniert).
Nun habe ich aber für Nutzer-Abfragen auch einige "MesssageDlg" -Meldungen und die geben
standardmäßig ein Beep.
Frage: Wie kann ich diesen Ton auf "Anwenderebene" deaktivieren und wieder aktivieren. Wenn ich schreibe auf "Anwenderebene", dann soll dies keine Auswirkungen auf andere Programme haben.
Im Internet gibt es Artikel (Windows.Beep verkürzen, Lautsprecher aus, etc), die aber immer darauf hinaus laufen, dass der Beep systemweit abgeschaltet wird.
In der Delphi-Hilfe finde ich:
Delphi-Quelltext
1:
| property BeepOnError: Boolean; |
Wo und wie schreibe ich im Programm diese Zeile hin? Nach Unit, Uses, Procedure, etc. meckert der Compiler
und genügt es dann im Programm einfach zu schreiben
BeepOnError:= false;
(Beep soll in System.SysUtils deklariert sein und die habe ich in Uses eingebunden. )
Danke und mfg hRb
PS: compiliere mit Delphi 10 Berlin