怎样结束线程合理? 主程序会关闭所有子线程,如一定要自己关,正常情况下应该用TThread的Terminate来停止线程,在线程的Execute中的循环里每次判断Terminated是否为true是则退出即可。强行终止线程可以用TerminateThread这个API,但它不会FREE线程类,如果手工FREE则会因为线程已终止而出错,建议不要这样用。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 谢谢raptor,你的:在线程里判断terminated为true,是不是在主程里调用threadid.terminate在线程里又怎么调用判断terminated呢?我不知道在本线程里怎么读出自己的属性,在java里使用this.xxxx可以查看修改本身属性,在delphi里是什么?线程里退出的指令又是什么?exit?return?break? 如:Procedure TMyThread.Execute;Begin While ( Not Terminated ) AND ( your condition ) Do Begin your code... End;End;Execute 执行完后线程就终止了,如果FreeOnTerminate 属性为 true 则线程终止时,同时自动释放线程对象。Delphi里与JAVA的this对应的是Self TcxTreeList 的问题。难为了 4,5个小时了。请大家帮忙!! 调用托盘程序 怎样才能让Button可以在窗体之间拖动。 有关 api 函数 FindFirstChangeNotification 怎么样应用 ? 如何知道FORM 中某个组件是否具有某个属性. 怎么判断窗体在运行? 请问:如何在DELPHI的安装程序中添加 安装序列号? 那位大虾会用syscad4控件,(在线等待) delphi中如何使从数据库输出的记录右对齐 创建表时错误信息,不明白?? 关于远程数据传输的问题,用拨号上网的方式实现断点续传(用Delphi),敬请高手回答?? Delphi应用程序安装设置问题???
在线程里又怎么调用判断terminated呢?我不知道在本线程里怎么读出自己的属性,在java里
使用this.xxxx可以查看修改本身属性,在delphi里是什么?线程里退出的指令又是什么?exit?
return?break?
Procedure TMyThread.Execute;
Begin
While ( Not Terminated ) AND ( your condition ) Do
Begin
your code...
End;
End;Execute 执行完后线程就终止了,如果FreeOnTerminate 属性为 true 则线程终止时,同时自动释放线程对象。
Delphi里与JAVA的this对应的是Self