<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<head>
<meta http-equiv="cache-control" content="max-age=180,private" />
</head>
<card id="discuz_wml" title="CnPack Forum">
<p>#1 转贴：有朋友报告的CnThreadPool.pas中可能有的问题。<br /><small>1 、用TerminateThread过程会强制结束线程，这里会造成任务中来不及释放的对象内存泄漏，<br />
<br />
2、<br />
<br />
 <br />
procedure TCnThreadPool.KillDeadThreads;<br />
<br />
var<br />
<br />
  i: Integer;<br />
<br />
begin<br />
<br />
  if csThreadManagment.TryEnter then<br />
<br />
  try<br />
<br />
    for i := 0 to FThreads.Count - 1 do<br />
<br />
      if TCnPoolingThread(FThreads[i]).IsDead then<br />
<br />
      begin<br />
<br />
        if FDeadTaskAsNew then<br />
<br />
        begin<br />
<br />
          if TCnPoolingThread(FThreads[i]).FProcessingDataObject &lt;&gt; nil then  ..</small><br />
</p>
<p>#1 <a href="index.php?action=thread&amp;tid=1701&amp;start=0&amp;offset=497&amp;sid=r7dQWJ">&gt;&gt;Next Page</a><br />
<br />Forum:<a href="index.php?action=forum&amp;fid=14&amp;sid=r7dQWJ">CnVCL 组件包</a>
<br />Thread:<a href="index.php?action=thread&amp;tid=1701&amp;sid=r7dQWJ">转贴：有朋友报告的CnTh ...</a>
<br />Next Thread:<a href="index.php?action=thread&amp;tid=1696&amp;sid=r7dQWJ">图像水纹(水泡)如何实 ...</a>
</p>
<p align="center"><br /><a href="index.php?sid=r7dQWJ">Home</a><br />
<a href="index.php?action=login&amp;sid=">Login</a><br /><br />
<small>Powered by Discuz!</small></p>
</card>
</wml>