Variant konvertieren in TObject

[skyware]

Hallo zusammen,

ich habe folgendes Problem, bei dem ich hoffe mit Eurer Hilfe eine
Lösung zu finden. :thumb:

ich habe ein Objekt "AObjekt", das ein published Property namens "Test" hat.
Dieses ist vom Type "TObjekt".
Mit der Funktion

Delphi-Quellcode:

var xObjekt : TObjekt

xObjekt := GetPropValue(AObject, 'Test');

möchte in nun dieses "TObjekt" auslesen und der Variabel xObjekt zuweisen.
Die Funktion "GetPropValue" liefert ein Variant zurück, wie kann ich diesen
nun in ein "TObjekt" konvertieren?

Ich hoffe meine Erklärung war einigermassen verständlich :gruebel:

Gruss und Danke im Voraus

[Dax]

Durch Zuweisung zu einem TObject? Würde ich mal raten ;) Hab noch nie wirklich mit Variants gearbeitet..

[SirThornberry]

direct nach TObject würde nicht funktionieren. Verwende lieber "GetOrdProp". Dies liefert dir das Property als Integer zurück was gleichzeitig ein Zeiger ist was wiederum der Zeiger auf die Instanz ist, also dein Object.

[skyware]

Hallo,

Danke für Eure Hilfe, das hat mich auf die richtige Spur geführt :thumb:
Es war der Befehl

Delphi-Quellcode:

GetObjectProp(AObject, APropertyName)

der funktionierte, danke! :coder:

[SirThornberry]

die funktion kannte ich noch nicht, ich hab immer GetOrdProp verwendet und das dann zu dem Object gecastet.