Objekt funktion override

[Gruber_Hans_12345]

Ich möchte gerne ZUR LAUFZEIT bei einem besteheneden Objekt eine funktion "override"

Vereifacht gesagt:

Delphi-Quellcode:

type
 TMyList = class(TList)
 private
   procedure MyClear;
 end;

procedure TMyList.MyClear;
begin
  //
end;

nun brauche ich eine Funktion, die es schaft irgendwie die MyClear als neue Clear funktion zu definiern.

Das ganze wird dann später zur Laufzeit aus einer art Interpreter generiert werden ...
Deshalb suche ich nun infos zu sowas ....

bin für alles dankbar

[mkinzler]

Ich versthe deine Frage nicht. Könntest du dein Anliegen genauer beschreiben?

[Gruber_Hans_12345]

Ok, ich versuche es

Ich muß zur Laufzeit eine "normale" TList erzeugen.
und für dieses eine Objekt muß ich es schaffen, das ich eine Methode, sagen wir die Clear methode überschreiben kann.
Das verhalten sollte so sein, wie wenn ich ein neuen Typ deklarieren würde.

[mkinzler]

Das wird schwer mann könnte aber den Originaltyp mit dem abgeleiteten Typ überlagern.

[himitsu]

Definier MyClear als VIRTUAL

und die Virtual-Method-List könnte man auch zur Laufzeit bearbeiten.


Auch wenn ich jetzt nicht verstehe, warum du das so machen willst ... könnte mir vorstellen, dß es einen anderen/besseren Weg gäbe, wenn wir wüssten, was damit erricht werden soll.

[Gruber_Hans_12345]

Hmmm.... Ich müsste irgendwie wissen, wie Delphi intern das mit dem override macht, gibt es dafür irgendwelche Sprungtabellen, die man da bearbeiten kann?

Das Problem ist, ich weiss erst zur laufzeit, das die funktion clear "override"n werden möchte.

[guinnes]

Zitat von Gruber_Hans_12345:

Hmmm.... Ich müsste irgendwie wissen, wie Delphi intern das mit dem override macht, gibt es dafür irgendwelche Sprungtabellen, die man da bearbeiten kann?

Es gibt für jede Klasse eine Virtuelle Methoden Tabelle, darin stehen ( u.a. ) die Adressen der für diese Klasse gültigen Virtuellen Methoden. Da die Tabelle im Code-Segment steht, bezweifele ich, dass die beschreibbar ist

[mkinzler]

Mir scheint diese Vorgehensweise auch nicht unbedingt optimal zu sein

[DeddyH]

Und wenn man Clear auf jeden Fall überschreibt und bei Nichtbedarf einfach inherited Clear aufruft?

[mkinzler]

An sowas hatt ich auch gedacht. Könnte man auch mit der Überlagerung kombinieren um diese Änderungen auf TList anzuwenden