Как предлагает Брэд, используйте PlaySound()
вместо TMediaPlayer
.Работает нормально, когда машина заблокирована.Не уверен, что он работает через подключение к удаленному рабочему столу.
Чтобы подтвердить это, я создал новое приложение, поместил TTimer
в форму, установил для свойства Interval
значение 20000 и поместил этот код всобытие OnTimer
:
procedure TForm13.Timer1Timer(Sender: TObject);
begin
PlaySound('c:\windows\media\tada.wav', 0, SND_ASYNC or SND_FILENAME);
end;
Затем я запустил его, заблокировал консоль (с помощью Windows L ) и подождал 20 секунд.Звук воспроизводится успешно.