|
program small;
{автор Richard Leigh, Deakin Univesity 1997}
Dummy : integer;
begin
Dummy := 0;
{Отключаем ALT-TAB}
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @Dummy, 0);
{Отключаем CTRL-ALT-DEL}
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0);
end. Великолепный способ!!! Хочу добавить, что он спасает не только от ALT-TAB, CTRL-ALT-DEL но и от CTRL-ESC и клавишы вызова меню из кнопки пуск (#91 - Win95 Keyb), что в сочетании с убиранием с экрана кнопки пуск создает классный эффект :) Распространенный вопрос: а как все назад-то вернуть? Вот ответ: //Включаем системную обработку
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 0, 0, 0); SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, 0, 0); А вообще посмотрите Windows SDK SystemParametersInfo
Много интересного.... |