delphi - 我有进程 ID，需要使用 Delphi 5 以编程方式关闭关联进程

当我拥有进程 ID 时，任何人都可以通过编码示例帮助我关闭关联的进程。我将使用 Delphi 5 在 Windows 2003 服务器上以编程方式执行此操作。

最佳答案

如果您有进程 ID 并希望强制该进程终止，则可以使用以下代码:

function TerminateProcessByID(ProcessID: Cardinal): Boolean;
var
  hProcess : THandle;
begin
  Result := False;
  hProcess := OpenProcess(PROCESS_TERMINATE,False,ProcessID);
  if hProcess > 0 then
  try
    Result := Win32Check(Windows.TerminateProcess(hProcess,0));
  finally
    CloseHandle(hProcess);
  end;
end;

关于delphi - 我有进程 ID，需要使用 Delphi 5 以编程方式关闭关联进程，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/2550927/