继承Tevent类 <- 中国开发网

账号

空空空 · 2007-06-13 13:34:41 · 阅读: 600

继承Tevent类

主进程
RequestEvent:=TEvent.create(nil,false,false,'Request');

一个线程
iret:=RequestEvent.WaitFor(INFINITE); //等待signal触发

另一个线程
RequestEvent.SetEvent; //进入Signal状态

相关信息:

在 delphi 里如何实现阻塞模式？ (106字) (pcplayer [646] 2007-06-13 17:10)
- thread_join. windows里 waitforsingleobject　或与之类似的那些个系统调用． (空) (bjwf [532] 2007-06-13 17:11)
- vcl忘光了，好像有对函数 (39字) (老玉米 [428] 2007-06-13 17:13)
  - 这个明显不满足他的需求． (空) (bjwf [392] 2007-06-13 17:14)
  - 我也想到 Suspend 但感觉似乎不是标准做法。看起来 Waitforsingleobject 似乎更专业，因为看起来更复杂。 (空) (pcplayer [453] 2007-06-13 17:16)
    - vcl的内部就是封装了 Waitforsingleobject (43字) (老玉米 [484] 2007-06-13 17:19)
      - 给（外行）人以更专业感 (空) (haitao [374] 2007-06-13 17:21)
        那就不要用TThread，全部自己调api (15字) (老玉米 [424] 2007-06-13 17:25)
      - 原来是这样，那看来suspend和resume也挺好． (空) (bjwf [372] 2007-06-13 17:22)
      - 那就是另外一个线程必须知道阻塞的那个线程，才能调用它：ThatThread.Resum。这样就不太好玩。 (21字) (pcplayer [424] 2007-06-13 17:26)
      - 胡扯！ (14字) (好望角 [449] 2007-06-13 18:52)
        不是吗？ (18字) (老玉米 [370] 2007-06-14 09:44)
    - 弄个全局变量，线程1 sleep一小段时间，再检查一下,线程2完事后改一下那个全局变量也行．但不够专业． (空) (bjwf [396] 2007-06-13 17:20)
      - 呵呵！我基本是采用这种土办法 (空) (UnKnow365 [409] 2007-06-13 19:19)
- 标准的做法线程一创建CreateEvent一个event, 然后用WaitForSingleObject等这个event,线程二干完事，用SetEvent． (空) (bjwf [1937] 2007-06-13 17:18)
  - 人家问delphi (20字) (老玉米 [437] 2007-06-13 17:20)
  - 貌似忘记ResetEvent了吧。 (21字) (好望角 [555] 2007-06-13 18:56)
- TCriticalSection or TSimpleEvent (空) (好望角 [594] 2007-06-13 18:30)
  - 设置临界区是一个办法。到那里就被阻塞住了直到另外一个线程释放临界区。 (空) (pcplayer [448] 2007-06-13 21:25)
- 继承Tevent类 (173字) (空空空 [599] 2007-06-13 21:34)
  - 老将出马，一个顶俩！ (空) (pcplayer [384] 2007-06-13 22:02)

欢迎光临本社区，您还没有登录，不能发贴子。请在这里登录

页面内容处理时间: 0.015 - 504280