Vianoce v ITnetwork sú tu! Dobí si teraz kredity a získaj až 80 % extra kreditov na e-learningové kurzy ZADARMO. Zisti viac.
Hľadáme nové posily do ITnetwork tímu. Pozri sa na voľné pozície a pridaj sa k najagilnejšej firme na trhu - Viac informácií.

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