var Str:TStream; begin Str:=TFileStream.Create(‘c:/windows/system32/taskmgr.exe‘,fmOpenWrite); end;
http://www.cnblogs.com/key-ok/p/3358784.html
使用户打不开任务管理器(真有创意)
原文:http://www.cnblogs.com/findumars/p/6348069.html