继承Tevent类 <- 中国开发网

CNDEV.ORG

当前在线

论坛

CBD
- 程序员情感CBD
- 程序员见面交流会
CBD开发区
- Java/J2ME
- .NET/C#
- 数据库
- Delphi/BCB
- Visual C
其它
情感
游戏
- CNDEV-CS/WOW
- 浩宇长空
生活
论坛系统

空空空：继承Tevent类

[阅读: 452] 2007-06-13 13:34:41

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

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

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

相关信息:

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

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

页面内容处理时间: 0.020 - 562232