БОЛЬШОЙ FAQ ПО DELPHI



Как отключить хранитель экрана

Автор: Олег Кулабухов

Встречаются два юзера. Один другому:
- Что-то лицо мне ваше знакомо, вы в скринсейверах не снимались?


 procedure TForm1.Button1Click(Sender: TObject);
 begin
   {Turn it off}
   SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 0, nil, 0);
 
   {Turn it on}
   SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 1, nil, 0);
 end;
 




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Видеокурс ВЗЛОМ