如何用CreateProcess得到进程ID和窗口句柄???!

                            
下面的代码:   
   
  //CreateProcess,创建进程  
  procedure   TForm1.Button3Click(Sender:   TObject);  
  var  
  StartupInfo:TStartupInfo;  
  ProcessInfo:TProcessInformation;  
  begin  
  FillChar(ProcessInfo,   sizeof(TProcessInformation),0);  
  FillChar(StartupInfo,Sizeof(TStartupInfo),0);  
  StartupInfo.cb   :=   Sizeof(TStartupInfo);  
  StartupInfo.dwFlags   :=   STARTF_USESHOWWINDOW;  
  StartupInfo.wShowWindow   :=   SW_HIDE;  
  If   CreateProcess('test.exe',  
  nil,  
  nil,  
  nil,  
  False,  
  NORMAL_PRIORITY_CLASS,  
  nil,  
  nil,  
  StartupInfo,  
  ProcessInfo)   then  
  begin  
  CloseHandle(ProcessInfo.hProcess);      
   
   
    //   问题:  
      这里面的ProcessInfo.hProcess是什么啊?进程句柄还是进程ID   ,如果是句柄如何得到ID啊?如何通过这个得到该程序窗口的句柄???     高手来!!!  
   
  end  
  end;......  
 

查看回复

最新教程