Methoden - "Vererbung"

[Neutral General]

Hi,

Also man kann ja einfach Methoden überschreiben etc...
Bin mir eigentlich recht sicher, dass das was ich vorhabe NICHT geht aber ich frage nochmal nach obs da irgendwas gibt, bzw ob man da was basteln/improvisieren könnte...

Angenommen ich habe eine Klasse mit einer Methode "Auto" und eine Nachfolgerklasse hat die Methoden "VW", "Audi", "BMW" und "Mercedes". Alle Methoden sollen quasi von "Auto" erben, also es soll bei jeder Methode am Anfang der Code von "Auto" ausgeführt werden. Geht das? Naja gut es ginge so:

Delphi-Quellcode:

TAuto = class
  procedure Test; virtual;
end;

TAuto2 = class(TAuto)
  procedure VW; 
  procedure Audi;
end;

procedure TAuto2.VW;
begin
  inherited Test;
end;

procedure TAuto2.Audi;
begin
  inherited Test;
end;

Aber das ist irgendwie nicht was ich suche...
Ja ich weiß.. Blöd wenn man selbst nicht weiß was man sucht/will

Aber vielleicht hat jmd eine besonders gute Glaskugel und kann mir trotzdem helfen

Edit: Ich will quasi dass inherited Test automatisch aufgerufen wird, ohne dass in der Methode selbst nochmal aufrufen zu müssen.

Sagen wir mal sowas wie:

Delphi-Quellcode:

TAuto2 = class(TAuto)
  procedure VW; inherits from Test;  
  procedure Audi; inherits from Test; 
end;

Gruß
Neutral General