unterschied VERERBUNG & POLYMORPHIE

[Medium]

Zitat von NamenLozer:

Gut, der Preis für die schönste Formulierung geht an dich

Delphi-Quellcode:

TBaseClass = class
  private
  public
    procedure Foo; virtual; abstract;
end;

TOneDerivate = TBaseClass
  private
  public
    procedure Foo; override;
end;

implementation

var
  AnObject: TBaseClass;

TOneDerivate.Foo;
begin
  DoSomething;
end;

begin
  AnObject := TBaseClass.Create;
  AnObject.Foo; // ***
end;

An der Stelle *** wird TOneDerivate.Foo ausgeführt, obwohl TBaseClass.Foo aufgerufen wird. Das ist Polymorphie.