var
i : integer;
begin
i := 0;

{запрещаем Ctrl-Alt-Del}

SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @i, 0);


end.
// необходим unit WinProcs
// для Alt-Tab: SPI_SETFASTTASKSWITCH

Взято из http://forum.sources.ru

© GAiST 2004 - 2008