|
Встретил такое вот решение (сам не пробовал):
Это можно сделать при помощи функции API SystemParametersInfo, которая позволяет узнать, либо установить параметры операционной системы, такие как установки клавиатуры, дисплея, звука и т.д. Она используется в Панели Управления. Синтакс функции следующий:
BOOL SystemParametersInfo(
UINT uiAction, // параметр, который нужно узнать или установить
UINT uiParam, // зависит от действия
PVOID pvParam, // зависит от действия
UINT fWinIni // флаг обновления информации о пользователе (user profile)
);
Значение каждого параметра объясняется в Win32 Developer's Reference. Теперь, чтобы сделать то, что мы хотим, вызываем следующую прцедуру:
procedure DisableCtrlAltDel;
var
i : integer;
begin
i := 0;
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, @i, 0);
end.
Аналогично можно отключить Alt-Tab. Для этого нужно задать SPI_SETFASTTASKSWITCH в качестве первого параметра функции.
|