ENoMoreFreeIDsException
EResourceException
Exception
TObject