richtigen Constructor aufrufen?

[Gruber_Hans_12345]

Zitat von Deep-Sea:

Du musst den Konstruktor als override deklarieren?! constructor Create; override;

geht leider nicht, da es sich um eine TList handelt, und da kann man den constructor nicht mit override deklarieren ....


Args.Obj ist eigetnlich ein TObject ... allerdings ist in einem Args.ObjTyp definiert das es sich nun um eine TClass handelt.

Das problem ist, ich habe keinen zugriff auf die Objekte die ich hier create will.
Es handelt sich um einen Interpreter in dem es möglich sein sollte Objekte zu kreieren .. diese sind alle mit {$M+} definiert, damit findet der Interpreter die, und eine Create kann ich auch aufrufen, nur dadurch das der constructor selbst nicht aufgerufen wird ... ist es natürlich etwas blöd ... es schein zu funktionieren -> aber halt etwas falsch

Ich vermute, das ich auf keinen grünen zweig kommen werde damit ...

[SirThornberry]

Das was du vor hast ist nicht möglich. Du musst schon eine gemeinsame Basisklasse haben und der Constructor muss entsprechend in abgeleiteten Klassen überschrieben werden.
Oder was würdest du zum Beispiel machen wenn jemand TComponent oder einen Nachfahren erzeugen will? Da braucht der Constructor einen Parameter der natürlich auch übergeben werden muss. (nicht umsonst müssen Komponenten die auf dem Formular platziert werden und automatisch erzeugt werden von TComponent abgeleitet sein)

[himitsu]

Zitat von Gruber_Hans_12345:

Args.Obj ist eigetnlich ein TObject ... allerdings ist in einem Args.ObjTyp definiert das es sich nun um eine TClass handelt.

Du konvertierst Objektzeiger und Klassenzeiger untereinander hin und her?
Das sind Probleme ja schon vorprogrammiert.

Zitat:

Das problem ist, ich habe keinen zugriff auf die Objekte die ich hier create will.

Tja, dann hast du ein Problem,
denn du kannst nur Methoden aufrufen, welche du an dieser Stelle kennst.
TObjekt kennt nur sein Create und da dieses nicht als virtual/dynamic deklariert ist, kann dieses nicht überschrieben werden, womit abgeleitete klassen dort nicht rankommen.
TObjekt und damit auch TClass kennen natürlich das Create deiner TList nicht, wodurch man darüber Dieses auch nicht aufrufen kann.

Entweder du kämpfst dich über die RTTI zum richtigen Constuctor der entsprechenden Klasse durch
oder du mußt alle nötigen Klassen selber umwandeln.

Delphi-Quellcode:

if Args.Cls = TList then
  Value := TList.Create
else if Args.Cls = TEdit then
  Value := TEdit.Create
else 
  raise Exception.Create('du hast ein Problem');

Wobei man bei sowas wie TEdit z.B. prüfen kann, ob Args.Cls als Vorfahren das TComponent besitzt und kann dann alle Nachfahren von TComponent über TComponent.Create(nil) erstellen, da TComponent einen virtuellen Constructor besitzt, welche alle Nachfahren überschrieben haben sollten.



Aber änder erstmal das obj: TObjekt in ein cls: TClass und laß das rumgercaste.

PS: Genau darum wurde in TComponent auch ein virtueller Constructor eingeführt, damit der DFM-Loader alle nötigen VCL-Komponenten laden kann, ohne deren abgeleitete Create kennen zu müssen.
Der DFM-Loader kennt das Create von TComponent und da dieses virtuell ist, kann jede abgeleitete Klasse dieses für sich überschreiben und schon kennt der DFM-Loader auch diese Klassen.
Bzw. er kennt die Adresse des virtuellen Create und nutzt alles, was darin verlinkt ist.