what about a class generator.

[rodrigo]

Insert in IDE Lazarus one tool, wizard, to choice the class that descend the new class creating one file, by example to create on new collection:

type
   TBooks=Class(TCollection)
    end;

Its is to classes and don't to components.