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 rs232c接脚与对连线

Delphi源码基础源码-按下回车取得焦点

Delphi 调用ie隐藏的命令

Delphi 闪盘小偷

Delphi 判断网络是否连通

Delphi下firedac连接mysql数据库零起点

Delphi getsessionusername通过会话id得到会话名称

Delphi windows 编程[2] - 学习窗体生成的过程二

Delphi 关于datetimepicker的一点问题（同时修改日期和时间的实现）

Delphi如何判断一个combobox是否处于下拉状态

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

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