Приведу пример, на основе которого, надеюсь, станет понятно. Допустим у тебя есть базовый класс TFigureObject, имеющий виртуальный метод Draw(Пустой)
| Код | TFigureObject = class(TObject)
private
FCanvas: TCanvas;
....
public
....
procedure Draw; virtual;
end;
procedure TFigureObject.Draw;
begin
//Пустой метод
end; |
Тогда ты можешь сделать наследника от этого класса и переопеределить метод Draw. Допустим это будет TEllipse:
| Код | TEllipse = class(TFigureObject)
public
...
procedure Draw; override;
end;
procedure TEllipse.Draw;
begin
FCanvas.Ellipse(...);
end; |
И, допустим, есть класс TRectangle:
| Код | TRectangle = class(TFigureObject)
public
procedure Draw; override;
end;
procedure TRectangle.Draw;
begin
FCanvas.Rectangle(...);
end; |
Тогда если ты, допустим, создашь массив обьектов TFigureObject
| Код | FiguteObjects: array of TFigureObject; |
и инициализируешь какое то количество элементов этого массива экземплярами классов TEllipse и TRectangle, то при вызове метода FigureObjects[i].Draw будет происходить вызов метода наслединка, то есть будте рисоваться либо эллипс, либо прямоугольник, в зависимости от того экземпляр какого обьекта был добавлен в массив.
Ну а если по теории, то для виртуальных(virtual) и динамических методов(dynamic) создается специальная VMT(Virtual Method Table) таблица, на основе которой и осуществляется вызов нужного метода.
Так понятно? |
).
? Я, если мне не изменяет память, видел в этой книге похожий пример года полтора назад, когда только начинал изучать Дельфи. 
) 