Показать сообщение отдельно
  #7  
Старый 18.04.2017, 13:26
pirsddd pirsddd вне форума
Прохожий
 
Регистрация: 01.04.2011
Адрес: Харьков
Сообщения: 31
Версия Delphi: 7 mini
Репутация: 10
По умолчанию

Цитата:
Сообщение от Alegun
тач не должен работать во сне
Спящего режима нет вообще, ни кнопки ни настроек в винде, только дисплей отключается.
Надо что-то типа такого, только для блокировки режима сна CS, а не S1, S2, S3, S4:
Код:
type
TForm1 = class(TForm)
private
procedure WMPowerBroadcast(var Message: TMessage); message WM_POWERBROADCAST;
...
end;

...

const
PBT_APMQUERYSUSPEND = 0;

procedure TForm1.WMPowerBroadcast(var Message: TMessage);
begin
if Message.Wparam = PBT_APMQUERYSUSPEND then
Message.Result := BROADCAST_QUERY_DENY;
end;
Ответить с цитированием