RSS订阅 | 匿名投稿
您的位置:网站首页 > 进程

delphi 关闭进程方法

UsesWindows,SysUtils,Tlhelp32;FunctionKillTask(ExeFileName:String):Integer;//关闭进程FunctionEnableDebugPrivilege:Boolean;//提升权限FunctionFindProcessId(ExeFileName:String):THandle;//查找进程Implemen…
类别:进程 标签: 作者:admin 日期:2016-01-20 22.38.36

Delphi 进程之间传递cmd参数

usesShellAPI;{Unit1.pas}通过这个单元的Button,调用另一个实例;procedureTForm1.Button1Click(Sender:TObject);beginShellExecute(Handle,'open','project2.exe','2HelloWorld',nil,SW_SHOWNORMAL);end;{Uni…
类别:进程 标签: 作者:admin 日期:2016-01-20 22.37.38

Delphi APIHook CreateProcess

unitApiHook;interfaceusesWindows,Messages,Dialogs,Con****ols,Classes,SysUtils,psapi;typePImpCode=^TImpCode;TImpCode=packedrecordJumpItn:Word;//应该是$25FF,JUMP指令AddressFun:PPointer;//真正的开始地址…
类别:进程 标签: 作者:admin 日期:2016-01-20 10.38.54

Delphi中查找进程及强行结束进程的方法

functionTfUpdate.FindProcess(AFileName:string):boolean;varhSnapshot:THandle;//用于获得进程列表lppe:TProcessEntry32;//用于查找进程Found:Boolean;//用于判断进程遍历是否完成KillHandle:THandle;//用于杀死进…
类别:进程 标签: 作者:admin 日期:2016-01-20 10.28.43

delphi杀进程的两种方式

第一种:比较简单,根据标题,找到窗口,再找到进程,杀死进程procedureKillProgram(WindowTitle:string);constPROCESS_TERMINATE=$0001;varProcessHandle:THandle;ProcessID:Integer;TheWindow:HWND;beginTheWi...
类别:进程 标签: 作者:admin 日期:2016-01-20 10.15.11

delphi程序禁止结束进程

自己程序中的一段代码,进程防杀。根据网上面流传的进程防杀的C++代码改编。DLL部分:PIMAGE_IMPORT_DESCRIPTOR=^_IMAGE_IMPORT_DESCRIPTOR;PImageImportDescriptor=PIMAGE_IMPORT_DESCRIPTOR;_IMAGE_IMPORT_DESCRIP…
类别:进程 标签: 作者:admin 日期:2016-01-20 10.13.19

Delphi 获取当前进程的父进程

有时候,我们创建了一个子进程,我们需要知道自己所隶属的父进程的ID。有几个办法,一个是调用微软未公开的NtQueryInformationProcess函数,另一个就是下面提供的一个函数,利用了公开的函数,运行需要包含tlhelp32单…
类别:进程 标签: 作者:admin 日期:2015-12-14 22.37.04

delphi监控指定进程防止被关闭

delphi监控指定进程防止被关闭对于守护中间件是非常有用的。中间件不可能绝对的稳定而不出问题,中间件有可能因比较严重的错误导致当机或者进程被人为地错误地关闭了中间件。有了这个自动守护进程的存在,这一切的问…
类别:进程 标签: 作者:admin 日期:2015-04-27 19.51.41

delphi 取正在运行的DLL或EXE的路径

functionGetSelfPath:string;varModuleName:string;i:Integer;beginSetLength(ModuleName,255);GetModuleFileName(HInstance,PChar(ModuleName),Length(ModuleName));i:=LastDelimiter('\',ModuleName);Result:=Copy…
类别:进程 标签: 作者:admin 日期:2015-04-27 19.44.14

DELPHI 获取系统当前活动窗口的句柄及对应的进程名

//下面的GetProcessNameById函数如下usesTLhelp32;functionGetProcessNameById(constAID:Integer):String;varh:thandle;f:boolean;lppe:tprocessentry32;beginResult:='';h:=CreateToolhelp32Snapshot(TH32cs_SnapPr…
类别:进程 标签: 作者:admin 日期:2013-11-28 20.55.38

DELPHI实现关闭指定进程,自身防杀

偶然翻到很久以前用DELPHI写的一个小程序,实现功能是在后台默默关闭符合条件的进程,并隐藏自身。编写目的是为了防止办公电脑运行游戏。实现原理是:1、程序运行后将自身以不同的名称一式三份存到系统各目录中,将其…
类别:进程 标签: 作者:admin 日期:2013-11-24 13.07.20

delphi 获取进程列表及相关信息

unitMain;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,TlHelp32,StdCtrls,ComCtrls,psAPI;typePTokenUser=^TTokenUser;_TOKEN_USER=recordUser:TSIDAndAttributes;en…
类别:进程 标签: 作者:admin 日期:2013-11-22 19.34.43

VB+Delphi实现进程保护

学学delphi做点东东玩玩吧。还是老思路不过是换了DLL看守了。1.DLL注入。2.创建线程。3.检测被守护进程是否存在。4.不存在就启动。DLL检测进程是否存在我...
类别:进程 标签:进程保护 作者:admin 日期:2013-10-21 22.14.53

delphi 如何在在Windows平台下实现进程隐藏

unitUnit1;interfaceusesWindows,Messages,SysUtils,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,tlhelp32;{typeTProcessEntry32=recorddwSize:DWORD;cntUsage:DWORD;th32ProcessID:DWORD;<b...
类别:进程 标签: 作者:admin 日期:2013-03-20 09.42.45

Delphi版进程间的相互调用与参数传递

一、主要场景a)主程序启动另外一个程序,并传递参数b)主进程向一个已经运行中的程序传递参数二、代码1)调用程序:varHWND:DWORD;ApplicationHWND:DWORD;begin...
类别:进程 标签: 作者:admin 日期:2013-02-07 21.58.07

delphi 监控其它进程

delphi监控其它进程programMonitor;//{$APPTYPECONSOLE}usesWinapi.Windows,System.SysUtils,ProcLibin'ProcLib.pas';varMutex:HWND;constc_AppName='server.exe';beginMutex:=Winapi.Windows.CreateMut...
类别:进程 标签: 作者:admin 日期:2013-01-24 13.12.39

Delphi隐藏当前进程(新)

主要需要解决两个问题,即隐藏窗口和设定热键。一.隐藏窗口通过API函数GETACTIVEWINDOW获取当前窗口;函数ShowWindow(HWND,nCmdShow)的参数nCmdShow取SW_HIDE时将之隐藏,取SW_SHOW时将之显示。例如:showwindow(get…
类别:进程 标签: 作者:admin 日期:2013-01-06 09.36.42

ring3下清零结束进程的delphi版本

unitClear0;interfaceuseswindows,SysUtils,TLHelp32;constSTATUS_SUCCESS=$00000000;STATUS_ACCESS_VIOLATION=&n...
类别:进程 标签: 作者:admin 日期:2011-08-18 14.05.12

改写个Delphi 版 Lz前辈的OpenProcess

‍用的时候记得引用一下JwaNative,JwaWinNT,JwaWinBase,JwaWinType,JwaNtStatus这些单元.------------------------------------------------------------------------------------------------------------…
类别:进程 标签: 作者:admin 日期:2011-08-16 09.32.34

Delphi获取进程占用内存

获取一些系统进程要提升Debug权限,这个不用说了吧.functionGetProcessMemorySize(ProcessName:string;varSize:string;varPN:string):Boolean;varpProcess:THandle;MemSize,t:Integer;hProcSnap:THandle;PPMCSize:Car…
类别:进程 标签: 作者:admin 日期:2011-08-13 14.28.22