Почему екземпляры класса TMarsRover не содержат таблицу вирт мето

← →
Slaga © (2004-06-09 14:45) [0]

Type
TMovable = class(TObject);

TRover = class(TMovable)
public
procedure Drive; virtual;
end;

TAutoRover = class(TRover)
public
procedure Drive; reintroduce; virtual;
procedure Refuel; virtual;
end;

TMarsRover = class(TAutoRover)
public
procedure Drive; override;
procedure SendImages;
end;

TPointer = class(TMarsRover)
public
procedure Point; virtual;
end;

Вопрос: Почему екземпляры класса TMarsRover не содержат таблицу виртуальных методов ?

← →
Sandman25 © (2004-06-09 15:02) [1]

А почему вы так думаете?

← →
MBo © (2004-06-09 15:13) [2]

А экземпляры класса и не должны ее содержать

← →
Slaga © (2004-06-09 18:44) [3]

To MBo
Почему ?

Потому что они содержат ссылку на нее.
VMT + F1

Почему екземпляры класса TMarsRover не содержат таблицу вирт мето Найти похожие ветки