线程内存释放问题

一个线程 只执行简单的代码

void __fastcall TMyThread::Execute()
{
FreeOnTerminate=true;
int p=0;
while(p<5)
{
p++;
Sleep(1000);
}
}

该线程循环5次后会自动退出， 如果该线程只有一个实例，观察内存，线程结束后内存释放正常。

但是如果同时实例化多个该线程，所有线程结束后内存会增加，不明白是哪里出问题。

应该怎么解决？