指针释放问题(50分)

我定义了一个数据结构，类似以下：
type Info=Record
...
...
thread:TMyThread;
End;
type pInfo=^info;
(其中的TMythread是我从TThread继承下来的一个线程类)
现在出现了指针释放问题，比如 :
var
pInfo;
我把p new出来后，存在TList中，
然后我释放指针p的时候出现问题: 我是先结束线程，然后dispose(p)
可是发现thread这个指针已经被dispose了，出现错误，
请问各位前辈如何解决？ 谢谢！

很对呀, thread 的有一个属性是用来指定是否在线程结束后自动dispose的.

先DISPOSE然后在结束线程

多人接受答案了。