怎样在主线程中得到线程终止事件??? 检查线程是不是被Terminated,如果是就new一个。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用 TTimer 检测 Thread.Suspended 属性 或者直接在 TTimer 里面不断的调用 Thread.Resume.TTimer 1 秒触发一次. 在线程的类定义中,自行再加一个属性变量bool Running; Execute() { 线程代码; Running=false; // 表示线程结束标志 } 线程运行前,设 MyThread1->Running=true; 一旦检测到 MyThread1->Running变成false;表示线程结束了,很简单,就看你想到没有 ! 循环好,如下:Procedure TYourThread.Execute;Begin While ( Not Terminated ) Do 你需循环执行的操作;End; try...except如何抛出异常 if ...else问题 面试回来 如何得到按住Alt + Tab列出来的程序列表及句柄 高手帮忙!如何用T-SQL语句写查一个多字段关键字表的在按某种排序下当前记录的上(下)一条记录? 菜鸟请教高手! 如何设计一个面向对象的计算器 100分答谢$$一个小程序的问题 关于webbrowser的两个问题! 空间命名扩展中的“目录”重命名问题 如何在DELPHI中调用内部命令等,详细点! Delphi中如何获取*.dll文件中的资源?
TTimer 1 秒触发一次.
Execute()
{
线程代码;
Running=false; // 表示线程结束标志
} 线程运行前,设 MyThread1->Running=true;
一旦检测到 MyThread1->Running变成false;表示线程结束了,
很简单,就看你想到没有 !
Procedure TYourThread.Execute;
Begin
While ( Not Terminated ) Do
你需循环执行的操作;
End;