delphi多线程_delphi三层架构源码_delphi多线程串行执行(15)

三、等待函数 WaitForSingleObject

一下子跳到等待函数 WaitForSingleObject, 是因为下面的 Mutex、Semaphore、Event、WaitableTimer 等同步手段都要使用这个函数; 不过等待函数可不止 WaitForSingleObject 它一个, 但它最简单.

function WaitForSingleObject(   hHandle: THandle;      {要等待的对象句柄}   dwMilliseconds: DWORD  {等待的时间, 单位是毫秒} ): DWORD; stdcall;       {返回值如下:}  WAIT_OECT_0  {等着了, 本例中是: 等的那个进程终于结束了} WAIT_TIMEOUT   {等过了点(你指定的时间), 也没等着} WAIT_ABANDONED {好不容易等着了, 但人家还是不让咱执行; 这一般是互斥对象}  //WaitForSingleObject 的第二个参数一般给常数值 INFINITE, 表示一直等下去, 死等. 

WaitForSingleObject 等待什么? 在多线程里就是等待另一个线程的结束, 快来执行自己的代码; 不过它可以等待的对象可不止线程; 这里先来一个等待另一个进程结束的例子, 运行效果图:

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-25504-15.html