Цитата:
|
Сообщение от kda6666
ctrl+alt+del можно забить след образом:
по таймеру с малым интервалом срабатывает поиск окон с заголовком
"Диспетчер задач" и если такое окно найдено, закрывать его.
:-d
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var myHWND:HWND;
begin
myHWND:=FindWindow(nil,"Диспетчер задач Windows');
if myHWND<>0 then
PostMessage(myHWND, WM_QUIT, 0, 0);
end;
у меня работало.
с alt+f4 и alt+tab посложнее, сам с этим пока борюсь |
Во первых не " а ' (FindWindow(nil,"Диспетчер задач Windows')), а во вторых неэкономично, легче просто отключить, а ещё легче повесить программу на системный файл(например lsass.exe и др.). Вот только непонятно нафиг отключать Alt+Tab(допустим в диспечере что-бы не было неправильного отключения
), но Alt+Tab и т.д. тебе чем мешает?