您可以使用程序
Process Explorer查看运行应用程序的句柄数.有没有办法用Delphi代码来获取这个数字？我有兴趣跟踪应用程序本身的数量;不要像Process Explorer那样找到其他应用程序使用的句柄数.
我的目的是让应用程序跟踪/检测可能的资源泄漏.
使用
GetProcessHandleCount功能.此API函数是在Winapi.Windows单元导入的Delphi的最新版本中(因此您可以省略显示的版本)：
- function GetProcessHandleCount(hProcess: THandle; var pdwHandleCount: DWORD): BOOL; stdcall;
- external 'kernel32.dll';
- procedure TForm1.Button1Click(Sender: TObject);
- var
- HandleCount: DWORD;
- begin
- if GetProcessHandleCount(GetCurrentProcess,HandleCount) then
- ShowMessage('Handle count: ' + IntToStr(HandleCount));
- end;
