Forum: Algorithmen, Datenstrukturen und Klassendesign
by Der schöne Günther,
17. Nov 2016
Aber Jünge!
Du müsstest doch eine Compiler-Warnung bekommen type
TBase = class
public procedure stuff(); virtual;
end;
TSub = class(TBase)
public procedure stuff(); virtual;
end;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by Der schöne Günther,
17. Nov 2016
Also entweder bin ich noch nicht lange genug wach, oder...
Ich verstehe nicht weshalb die ganzen Typecasts sein müssen. Du hast doch mal eine Oberklasse, das ist doch schon mal ordentlich was wert. Du kannst auf Unterklassen lustig typecasten, aber in der Implementierung wird immer die "unterste" aufgerufen: program Project11;
{$APPTYPE CONSOLE}
{$R *.res}
type
TBird = class
public...