Как наследовать метод не родителя, а родителя родителя?

← →
Knyaz17 (2001-12-21 12:57) [13]

Да, но не годится, если в методе класса1 другой такой же наследуемый во всех классах метод!!!
То есть у меня есть:

TClass1 = class(...)
procedure Go; override;
procedure Refresh; override;
end;

TClass2 = class(TClass1)
procedure Go; override;
procedure Refresh; override;
end;

TClass3 = class(TClass2)
procedure Go; override;
procedure Refresh; override;
end;

и метод Refresh срабатывает в Go для Class1!!!, а в Class3 он переопределен, и должен срабатывать.

Как наследовать метод не родителя, а родителя родителя? Найти похожие ветки