关于线程的两个问题！

Question

我用几个线程实现串口发送升序
1，线程是执行完毕以后自动中止，如果我想通过按钮事件停止串口数据发送，该怎么做？
2，当串口数据发送完以后，我能否用 if mythd<>nil 来判断线程是否结束？？？

Answer 1

用互斥变量或信号量不好吗？Delphi5开发人员指南上有讲的，很详细

Answer 2

1.调用线程的Terminate方法，需要在Execute中检查Terminated属性，为true时中止线程执行
或者使用API函数TerminateThread（立即中止，比较危险）
2.可以自定义消息，在线程中发送消息来通知

Answer 3

建立TCriticalSection、互斥信号量……