将TObject反引用到整数

Question

我有一个来自绝地JCL RunningProcessList的函数，定义如下.

procedure RunningProcessesList(AList: TStrings; ABoolean: Boolean)

文档指出，函数将运行中的二进制名称放在AList.Strings[n]索引中，进程id放在AList.Objects[n]中作为指向整数的值。

我怎么去引用这个来得到实际值。在该函数中，它按如下方式分配值。

List.AddObject(FileName, Pointer(ProcEntry.th32ProcessID));

其中ProcEntry: TProcessEntry32;

如何将PID分配给Objects字段？

Answer 1

PID是

PID := DWORD(List.Objects[Index]);

其中索引是利息项的索引。