[SBJoker]

э.х. забыл про наследование классов написать...
Кароче есть наследование классов, например:

Type MyExType Extends MyBaseType

End Type

После наследования класс нового типа всегда можно присваивать переменным базового типа, пользоваться локальными переменными базового типа как своими собственными. Пользоваться методами базового типа, если они не переопределены в текущем. В любом случае доступ даже к переопределёному методу базового класса возможен через объект Super. Например:
Super.DoMethod()

Доступ к свои методам помимо указания их имени, возможен посредством объекта Self. Например:
Self.DoMethod()

Эти возможности восновном для исключения неопределённости.

Зачем нужно наследование? Для расширения возможностей базового класса.
Например базовый класс Unit можно расширить до конкретных класов TSolder, TAircraft, TTechnic

В которых будут учтены особенности этих типов юнитов. Однако их можно все поместить в один список или массив и обрабатывать однотипно. Т.к. они фактически одного типа.