<?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 Bug in cnDebug.pas TraceObjectWithTag/LogObjectWithTag<br /><small>Hello,<br />
<br />
i think there is a bug in TraceObjectWithTag/LogObjectWithTag, the ATag is not evaluated<br />
<br />
[code]procedure TCnDebugger.TraceObjectWithTag(AObject: TObject;<br />
  const ATag: string);<br />
{$IFNDEF NDEBUG}<br />
var<br />
  List: TStringList;<br />
  Intfs: string;<br />
{$ENDIF}<br />
begin<br />
{$IFNDEF NDEBUG}<br />
  List := nil;<br />
  try<br />
    List := TStringList.Create;<br />
    try<br />
      AddObjectToStringList(AObject, List, 0);<br />
      Intfs := FormatObjectInterface(AObject);<br />
      if Intfs &lt;&gt; '' then<br />
      begin<br />
       ..</small><br />
</p>
<p>#1 <a href="index.php?action=thread&amp;tid=241084&amp;start=0&amp;offset=497&amp;sid=ZfO3Vw">&gt;&gt;Next Page</a><br />
<br />Forum:<a href="index.php?action=forum&amp;fid=25&amp;sid=ZfO3Vw">CnWizards IDE Wizard ...</a>
<br />Thread:<a href="index.php?action=thread&amp;tid=241084&amp;sid=ZfO3Vw">Bug in cnDebug.pas T ...</a>
<br />Next Thread:<a href="index.php?action=thread&amp;tid=241089&amp;sid=ZfO3Vw">Delphi 10.4 is there ...</a>
</p>
<p align="center"><br /><a href="index.php?sid=ZfO3Vw">Home</a><br />
<a href="index.php?action=login&amp;sid=">Login</a><br /><br />
<small>Powered by Discuz!</small></p>
</card>
</wml>