Отключение клавиш Ctrl+Alt+Del

var
i:integer;
begin
i:=0;
SystemParametersInfo(SPI_SCREENSAVERRUNNING,1,@i,0);
end;

Отключение клавиш Alt+Tab

var
i:integer;
begin
i:=0;
SystemParametersInfo(SPI_SETFASTTASKSWITCH,1,@i,0);
end;