Wie benutze ich TCollection?

[Blackthorne]

Hallo Zusammen,

Ich möchte TCollection Items vom Typ TWaveItem zuweisen.

Allerdings hat die "Add" Prozedur von TCollection noch keine Parameter, mit denen ich das Item
einfügen kann.
Also hab ich mir die Klasse abgeleitet:

Delphi-Quellcode:

TWaveCollection  = class(TCollection)
      public
         procedure Add(item: TWaveItem);
   end;

Implementation:

Delphi-Quellcode:

procedure TWaveCollection.Add(item: TWaveItem);
begin
   Add(Pointer(item));
end;

Ich hab also versucht, die Methode "add" dahingehend zu ändern, damit ich meinen Parameter bekomme.
Leider funktioniert es so absolut nicht

Ich denke, mir fehlt irgendwie das Verständnis.
Kann mir jemand helfen?

MfG,
Blackthorne