interdire alt F4 et ctrl_alt_suppr
Bonjour,
Je voulais savoir si il etait possible d interdire ces deux combinaisons de touches.
G trouve une fonction qui est censee ne pas afficher le processus lors dun ctrl alt suppr, mais apparemment ca ne marche pas, c ss doute incompatible ac 2000
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| procedure ctrl_alt_suppr;
var handle:integer;
proc:function(dwProcessId: DWORD; dwType: DWORD)
: DWORD; stdcall;
begin
Handle:=LoadLibrary('krn386.exe');
if Handle=0 then Handle:=LoadLibrary('kernel32.dll');
if Handle<>0 then
begin
@proc:=GetProcAddress(Handle, 'RegisterServiceProcess');
if @proc<>nil then
proc(0,1);
FreeLibrary(Handle);
end;
end; |
merci d avance
