10.6 Наследование

Как было отмечено в предыдущем разделе, можно создать потомков хелпера классов. Так как в текущей области может быть использован только последний класс хелпера, необходимо наследовать его от другого, если необходимо использовать методы обоих хелперов. Более подробно об этом в следующем разделе.

Потомок хелпера класса может расширять другой класс, чем его родитель. Ниже приводится допустимый вспомогательный класс для TMyObject:

TObjectHelper = class helper for TObject

  procedure SomeMethod;

end;

TMyObject = class(TObject)

end;

TMyObjectHelper = class helper(TObjectHelper) for TMyObject

  procedure SomeOtherMethod;

end;

TMyObjectHelper наследуется от TObjectHelper, он не расширяет класс TObject, однако он расширяет только класс TMyObject.

Так как записи не могут наследоваться, очевидно что потомки хелперов записей могут расширять только ту же запись.

Примечание: