Und weil wir gerade bei den guten Ratschlägen sind:
Nimm doch eine TList/TObjectList aus der
Unit Generics.Collections.
Da kannst du den Typ deiner Objekte angeben und sparst dir das casten.
//edit: Sorry ... seh grad deine Delphi-Version. (Generics funzen erst ab
2009) Vergiss meinen Kommentar einfach.