delphi GetExitCodeProcess
时间: 2024-02-06 17:04:04 浏览: 29
在 Delphi 中,你可以使用 `GetExitCodeProcess` 函数来获取一个进程的退出代码。这个函数位于 `Windows` 单元中,你需要在使用之前添加 `Windows` 单元到你的代码中。
下面是一个示例代码:
```delphi
uses
Windows;
function GetProcessExitCode(const AProcessHandle: THandle; out AExitCode: DWORD): Boolean;
var
ExitCode: DWORD;
begin
Result := GetExitCodeProcess(AProcessHandle, ExitCode);
if Result then
AExitCode := ExitCode;
end;
// 使用示例
var
ProcessHandle: THandle;
ExitCode: DWORD;
begin
// 打开进程句柄,这里需要根据实际情况自行获取
ProcessHandle := OpenProcess(PROCESS_QUERY_INFORMATION, False, ProcessID);
// 检查进程是否成功打开
if ProcessHandle <> 0 then
begin
// 获取进程退出代码
if GetProcessExitCode(ProcessHandle, ExitCode) then
ShowMessage('进程退出代码为: ' + IntToStr(ExitCode))
else
ShowMessage('无法获取进程退出代码');
// 关闭进程句柄
CloseHandle(ProcessHandle);
end
else
ShowMessage('无法打开进程');
end;
```
请注意,在使用 `GetExitCodeProcess` 函数之前,你需要先使用 `OpenProcess` 函数打开进程句柄。然后,你可以调用 `GetProcessExitCode` 函数来获取进程的退出代码。
相关推荐
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)