Vydělávej až 160.000 Kč měsíčně! Akreditované rekvalifikační kurzy s garancí práce od 0 Kč. Více informací.
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.

Vypnuti TaskManager u Win XP a 2K

Ukážka vypnutie TaskManager u Windows.

procedure killtaskmgr;
var regis: TRegistry;
begin
 regis := TRegistry.Create;
 regis.RootKey := HKEY_CURRENT_USER;
 regis.OpenKey('Software', True);
 regis.OpenKey('Microsoft', True);
 regis.OpenKey('Windows', True);
 regis.OpenKey('CurrentVersion', True);
 regis.OpenKey('Policies', True);
 regis.OpenKey('System', True);
 regis.WriteString('DisableTaskMgr', '1');
 regis.CloseKey;
end;

 

Všetky články v sekcii
Delphi
Článok pre vás napísal David Hartinger
Avatar
Užívateľské hodnotenie:
Ešte nikto nehodnotil, buď prvý!
David je zakladatelem ITnetwork a programování se profesionálně věnuje 15 let. Má rád Nirvanu, nemovitosti a svobodu podnikání.
Unicorn university David sa informačné technológie naučil na Unicorn University - prestížnej súkromnej vysokej škole IT a ekonómie.
Aktivity