我的应用程序是一个tcp/ip服务器,主线程只创建一次并且一直在监听.当新客户端连接时,主线程创建TClientThread类型的新线程.但是没有运行客户端线程的列表,因为这会使我的应用程序有点复杂...有没有办法在所有线程上执行"terminate"方法,即使线程忙(在我的情况下"忙")意味着它正在等待数据,超时设置大约是30秒......所以无论如何我都要杀掉它,而不是等待.)?简单的关闭应用程序似乎不会在线程上运行"terminate"方法,最终会导致FastMM报告内存泄漏...
TClientThread
delphi tthread terminate fastmm
delphi ×1
fastmm ×1
terminate ×1
tthread ×1