Шаблон:
Type Banana
Global lst:TList = New TList
'тут поля
Method New()
lst.AddLast(Self)
EndMethod
Method Delete() 'Вот эта штука глючна, и если компилятор даёт ошибку, её надо переименовать
lst.Remove(Self)
EndMethod
EndType
'Пример цикла
For bana:Banana = EachIn Banana.lst
Next