Отключить и включить Ctrl+Alt+Delete - Программирование в Delphi - Каталог статей

Отключить и включить Ctrl+Alt+Delete

Если Windows думает, что работает хранитель экрана (ScreenSaver), то она отключает окно "Завершение работы программы", появляющееся по Ctrl+Alt+Delete. Эта программа сообщает Windows о том, что запущен хранитель экрана (ScreenSaver). Code procedure TForm1.Button1Click(Sender: TObject); var b: boolean; begin SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, @b, 0); if b then SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, @b, 0); end; Источник: http://delphi4all.narod.ru/how/ctrlaltdel.htm
1 2 3 4 5 Категория: Программирование в Delphi \| Добавил: Nikol05 (15.11.2010)
Просмотров: 1444 \| Рейтинг: 0.0/0