Автоматическое отключение звука

[Lauri]

Очень задолбали соседи по блоку, врубают громко музыку до 2-3 ночи. Решил написать и закинуть им прогу которая бы отключала звук после 00-00.
Как выключать звук у меня код имеется, а вот как реализовать другую часть : от 00.00 до 6.00 сравнивать время и если в этом промежутке то отрубать звук. Прошу помощи. Кто жил/живёт в общаге поймут

[Хамяг]

можно банально таймером каждые 5-10 минут (300-600 секунд) проверять время. время можно получить с помощью функции SysUtils.Time;

[Человек_Борща]

Что-то очень похожее крутил в раб.проекте полделюсь кодом..
Думаю разберётесь, не сложно..

procedure TApp.DoRestartTimer(Sender: TObject);
var
  d1, d2: integer; //counter
begin
  //Если задача активна и запущена.
  if (AppInfo.ActiveTask) and (not (AppThr = nil)) then
  begin
    //процесс перезапуска в назначенный день
    if AppInfo.EveryDayRestarting_flag then 
    begin
      case AppInfo.EvDayRestartType of
        0: //Restart
          begin
            d1 := CompareTime(Now, AppInfo.RestartInTime); //сравниваем заданное время с текущим
            d2 := CompareDate(Now, AppInfo.RestartInDate); //сравнваем заданную дату с текущей
            if ((d1 = 0) or (d1 = 1) and (d2 = 0)) then
            begin
              {Если время совпало или уже прошло, а дата совпала значит перезапуск}
              stop;
              Start;
              AppInfo.EveryDayRestarting_flag := False; //выключаем опцию, чтобы не повторялось
              AddRestartEventToLOG(AppInfo.ListName);
            end;
          end;

        1: //Disable
          begin
            d1 := CompareTime(Now, AppInfo.RestartInTime);
            d2 := CompareDate(Now, AppInfo.RestartInDate);
            if ((d1 = 0) or (d1 = 1)) and (d2 = 0) then
            begin
              Stop;
              AppInfo.ActiveTask := False;
            end;
          end;
      end;
    end;
  end;
end;

Только модуль DateUtils не забудте...

[vesnik1988]

Сообщение от Lauri

Очень задолбали соседи по блоку, врубают громко музыку до 2-3 ночи. Решил написать и закинуть им прогу которая бы отключала звук после 00-00.
Как выключать звук у меня код имеется, а вот как реализовать другую часть : от 00.00 до 6.00 сравнивать время и если в этом промежутке то отрубать звук. Прошу помощи. Кто жил/живёт в общаге поймут

Наткнулся на сообщение...
У меня аналогичная проблема...
Не поделишься кодом для отключения звука...
А то никак не получается...
Спасибо!)