Delphi 根据进程名称获取进程号

Delphi 根据进程名称获取进程号:

Function GetPID(_GetPID: String;): integer;
var
  h: THandle;
  f: Boolean;
  lppe: TProcessEntry32;
begin
  h := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  lppe.dwSize := SizeOf(lppe);
  f := Process32First(h, lppe); // lppe.szExeFile是进程的名字，自己挑选你要的
  // lppe.th32ProcessID就是你要的进程号
  while integer(f) <> 0 do
  begin
    if Pos(_GetPID, lppe.szExeFile) > 0 then
    begin
             Result := lppe.th32ProcessID;
    end;
    f := Process32Next(h, lppe);
  end;
end;

相关阅读 >>

Delphi 检测进程是否存在函数

Delphi 给力版 getprocaddress

Delphi 用idhttp得到本机外网ip

Delphi中move 函数额用法

Delphi 串口 字符串转换ascii

Delphi版雪花算法

Delphi 计算农历的单元

Delphi 关于虚拟的desktop的编程

Delphi判断文件大小

Delphi 如何解析网址？

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 根据进程名称获取进程号