如何得到由CreateProcess打开的外部应用程序的窗口句柄

[renju]

在线等

[WGYKING]

var
FSI: TStartupInfo;
FPI: TProcessInformation;
begin
FillChar(FSI, SizeOf(TStartupInfo), 0);
FSI.cb := SizeOf(TStartupInfo);
FillChar(FPI, SizeOf(TProcessInformation), 0);
if CreateProcess('c:\neteas\eas\Neteas.exe', nil, nil, nil, True, NORMAL_PRIORITY_CLASS, nil, nil, FSI, FPI) then
begin
Caption := Caption + Format(' - New process ID is %d', [FPI.hProcess]);
//进程句柄为FPI.hProcess
end;
end;

[renju]

兄台啊，我想的得到新窗口的句柄。
Caption := Caption + Format(' - New process ID is %d', [FPI.hProcess]);
此句只是改了一下母窗口的caption.

[renju]

郁闷啊，没人能回答？？？

[renju]

没人回答了，结帖了！