文件名称：获取进程路径
文件大小：107KB
文件格式：RAR
更新时间：2014-12-18 04:37:27
获取进程路径
获取正在运行进程的完整路径 function EnabledDebugPrivilege(const bEnabled: Boolean): Boolean; var hToken: THandle; tp: TOKEN_PRIVILEGES; a: DWORD; const SE_DEBUG_NAME = 'SeDebugPrivilege'; begin Result := False; if (OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES, hToken)) then begin tp.PrivilegeCount := 1; LookupPrivilegeValue(nil, SE_DEBUG_NAME, tp.Privileges[0].Luid); if bEnabled then tp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED else tp.Privileges[0].Attributes := 0; a := 0; AdjustTokenPrivileges(hToken, False, tp, SizeOf(tp), nil, a); Result := GetLastError = ERROR_SUCCESS; CloseHandle(hToken); end; end;
【文件预览】：
进程模块
----ProcessDelUnit.~ddp(51B)
----ProcessUnit.~ddp(51B)
----FKFAP.sys(13KB)
----ProcessUnit.ddp(51B)
----RKHit.sys(32KB)
----ProcessUnit.dcu(21KB)
----ProcessDelUnit.~pas(19KB)
----Project1.stat(180B)
----DllUnit.~pas(1KB)
----Win32API.dll(32KB)
----ProcessDelUnit.dcu(21KB)
----Project1.~dpr(247B)
----ProcessUnit.~dfm(53KB)
----ProcessUnit.pas(19KB)
----ProcessUnit.dfm(53KB)
----ProcessDelUnit.~dfm(53KB)
----ProcessUnit.~pas(19KB)
----Project1.res(876B)
----DllUnit.pas(2KB)
----ProcessDelUnit.dfm(53KB)
----ProcessDelUnit.pas(19KB)
----ProcessDelUnit.ddp(51B)
----Project1.dof(2KB)
----Project1.dpr(262B)
----Project1.cfg(434B)
----DllUnit.dcu(2KB)