为什么 Application->ProcessMessages() 不起作用了？

[flyingdiablo]

代码
while (!Terminated)
{
Application->ProcessMessages();
if(tm_error)
Synchronize(initialization);
else
{
.......
}
}
.........

我在线程中执行这段代码 由于一直不能与服务的连接 所以tm_error 一直为FALSE，造成循环，程序类似死掉，加了 Application->ProcessMessages();
也没有作用，有没有可能跟多线程有关？因为我在另外一个线程中执行类似的循环
大家，帮忙看看，什么原因，有什么解决办法？ 在这里多谢了

[windindance]

while (!Terminated)
{
Application->ProcessMessages();
if(tm_error)
Synchronize(initialization);
else
{
.......
}
Sleep(50); //必须！
}

[猛禽]

在线程中用ProcessMessages似乎没用吧，它只是防止在消息响应中阻塞其它消息的处理用的，一个线程并不会影响另一个线程的执行，即主线程中的消息响应不会被子线程所阻塞。也许是你的线程占用太多的资源，我曾经写过一个SOCKET程序，也是在一个线程里用循环LISTEN，结果CPU占用100%，跟死机没两样。

[dzt1]

在你的循环条件中再加一条限制条件配合使用，
比如加上：bool flag;
while (!Terminated&&flag==true)
{
Application->ProcessMessages();
if(tm_error)
Synchronize(initialization);
else
{
.......
}
Sleep(50); //必须！

}
发送条件消息时同时让flag==false就可以了。

[kingcaiyao]

代码
while (!Terminated)
{
Application->ProcessMessages();
if(tm_error)
Synchronize(initialization);
else
{
.......
}
Application->ProcessMessages();
}

[flyingdiablo]

to Kingcaiyao(AKing)
还是没有效果：
怎么办好呢？？

[flyingdiablo]

to windindance(风舞轻扬)
还是没有作用，怎么办？
to raptor(猛禽)
应该不是那种问题，我的程序只占很少的资源，
开起来之后，总的资源也只用了10%，还有什么方面的原因吗？

大家帮忙啦，谢谢

[windindance]

要么你可以记录连接的次数
当超过1000次时退出线程

[flyingdiablo]

to windindance(风舞轻扬)
不行呀，我的程序因为是个短信服务程序
不能够停的呀，除非人为的停止，否则要一直在连接
还有什么好办法吗？

[kingcaiyao]

To flyingdiablo:
你看这样行不行：

while (!Terminated)
{

if(tm_error)
{
Application->ProcessMessages();
Synchronize(initialization);
}
else
{
Application->ProcessMessages();
....
}
}