TEvent 哪位可以给我一个多线程同步中使用TEvent的例子程序阿 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 TEvent形象的说就是全局变量,线程状态就是改个值罢了 global_Event:=TEvent.create(...);主线程中运行到这里.... thread2_Simple=TThread2_simple.create(...); global_Event.waitfor(时间);//挂在这里等待线程thread2_Simple将标志更改TThread2_simple.execute;begin .....执行你的操作global_Event.setevent;//更改标志,。他继续运行它的代码的同时,主线程也继续运行他的代码end;就这么简单的 不是主线程里waitfor是在子线程里我起先是直接将线程的挂起和唤醒放在timer里的但是那样线程不安全运行有问题在执行resume时线程没法起来只能用execute来执行挂起的子线程那样不能多次运行 不太理解楼主的意思,我一般是在主线程里“线程.Event.waitfor”等待所有运行的线程线程执行到需要同步的时候先Event.setevent通知主线程再挂起自身,当主线程收到全部的Event.setevent后再resume各线程 Delphi2010生成的程序体积太大了 在excel里面怎样进行下述(类4舍5入)转化? 那位大虾给我写个小算法,100分献上,不够在给!~ 怎么将excel数据导入access数据库 请问到那里有delphi做的仓库管理系统。 打印控制码直接端口打印,请问如何改变字体(瘦长型的宋体)? 从今天开始,不要老在CSDN里乱晃,但不是不来。 请问如何获取Windows中驱动程序的信息? 怎样做自定义的登陆输入框? 为什么同样的加、解密算法在Win98上正常,在NT4.0则不正常? 可执行文件的大小多少合适? 谁有Screen Demo Maker 3.0的序列号,第一个回答的分数全给他
global_Event:=TEvent.create(...);主线程中运行到这里
....
thread2_Simple=TThread2_simple.create(...);
global_Event.waitfor(时间);//挂在这里等待线程thread2_Simple将标志更改TThread2_simple.execute;
begin
.....执行你的操作global_Event.setevent;//更改标志,
。他继续运行它的代码的同时,主线程也继续运行他的代码
end;就这么简单的
但是那样线程不安全运行有问题在执行resume时线程没法起来只能用execute来执行挂起的子线程
那样不能多次运行
线程执行到需要同步的时候先Event.setevent通知主线程再挂起自身,当主线程收到全部的Event.setevent后再resume各线程