Оператор условия

[nattaella]

Как мне можно запрограммировать выражение "если произошло событие, то что-то исполняется"? Например, при нажатии пользователем в процессе работы программы раздела 1 меню компонента TmainMenu какая-то исполняется процедура....

procedure TForm1.Zvuk;
begin
if N1.Click then Bomb;
end;

Мне это нужно для того, чтобы если пользователь выбрал к примеру флажок "Со звуком"(N1.Click), то воспроизводится звук бомбы (Bomb), который есть в нескольких процедурах и будет воспроизводиться не один раз.

 

[nayke]

Как мне можно запрограммировать выражение "если произошло событие, то что-то исполняется"? Например, при нажатии пользователем в процессе работы программы раздела 1 меню компонента TmainMenu какая-то исполняется процедура....

procedure TForm1.Zvuk;
begin
if N1.Click then Bomb;
end;

Мне это нужно для того, чтобы если пользователь выбрал к примеру флажок "Со звуком"(N1.Click), то воспроизводится звук бомбы (Bomb), который есть в нескольких процедурах и будет воспроизводиться не один раз.

На событие N1.OnClick вешаете код процедуры Bomb при нажатии на элемент процедура выполнится.
Если при этом выбирается какая-нить настройка и предположим у вас объектной структуры нет, то можно сохранить в глобальную переменную например CurrentVolume или другую и проверять ее значение где вам необходимо.