<?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 comserv.pas 有内存泄漏。<br /><small>如果在project中先加入cnMemProf(内存泄漏检测单元)<br />
然后在调用 uses ComServ;<br />
即使不写任何的其他语句，在退出的时候还是会出现一处内存泄漏。<br />
其问题代码如下：<br />
==============================================<br />
initialization<br />
begin<br />
  OleAutHandle := SafeLoadLibrary('OLEAUT32.DLL');<br />
  ComServer := TComServer.Create;<br />
  if not ModuleIsLib then<br />
  begin<br />
    SaveInitProc := InitProc;<br />
    InitProc := @InitComServer;<br />
    AddTerminateProc(@Aut ..</small><br />
</p>
<p>#1 <a href="index.php?action=thread&amp;tid=66&amp;start=0&amp;offset=497&amp;sid=N0nV60">&gt;&gt;Next Page</a><br />
<br />Forum:<a href="index.php?action=forum&amp;fid=8&amp;sid=N0nV60">CnPack IDE 专家包（CnW ...</a>
<br />Thread:<a href="index.php?action=thread&amp;tid=66&amp;sid=N0nV60">comserv.pas 有内存泄 ...</a>
<br />Next Thread:<a href="index.php?action=thread&amp;tid=63&amp;sid=N0nV60">关于TNotifyEvent的问 ...</a>
</p>
<p align="center"><br /><a href="index.php?sid=N0nV60">Home</a><br />
<a href="index.php?action=login&amp;sid=">Login</a><br /><br />
<small>Powered by Discuz!</small></p>
</card>
</wml>