No Sound Option

[BBoy]

In meinem Programm werden klänge abgespielt, klicks und ereignisklänge.
Nun möchte ich in meinem Programm die Einstellung einbauen "No Sound", also das die klänge nicht abgespielt werden wenn die option aktiv ist.
Am offensichtlichsten wäre:
If NoSound=false then
playsound;

Allerdings wären das sehr viele IF abfragen, daher meine Frage: Geht das nicht auch anders, eher global???
Den sound global MUTE schalten ist nicht gut, da ich noch musik hören will oder so.

[Nuclear-Ping]

Die Prüfung halt in PlaySound machen.

Delphi-Quellcode:

procedure TMyIrgendwas.PlaySound;
begin
  if NoSound then
    Exit;

  {...}
end;

[BBoy]

ja ,daran hätte ich wohl früher denken sollen.
habe es leider nicht in einer prozedur sondern immer direkt an der stelle im programm wo der sound abgespielt werden soll.
hätt da auch nicht gedacht das das programm mal so aufwendig wird. nja werde ich wohl nicht herum kommen das ganze in eine prozedur zu schreiben.

[Nuclear-Ping]

Ein Leitfaden beim Programmieren sollte immer sein "Never repeat yourself".

[BBoy]

Klingt logisch, dass merke ich mir! Danke!

Denke der Beitrag kann geschlossen werdne.