title: delphi TCollection count not increasing after Add
body: <p>i have the types</p>
  
  <ul>
  <li>TNotifyReply = class(TCollectionItem)</li>
  <li>TNotifyReplylist = class(TOwnedCollection)</li>
  </ul>
  
  <p>NotifyReplylist := TNotifyReplylist.Create(self, TNotifyReply);</p>
  
  <p>After calling this function (Any number of times), Count it still zero</p>
  
  <pre><code>function TNotifyReplylist.addItem: TNotifyReply;
   begin
     Result := inherited Add as TNotifyReply;
     OutputDebugString(PAnsiChar('Count &gt; '+ inttostr(count)));
   end;
  </code></pre>
  
  <p>Any idea whats going on here?</p>