Ich habe folgendes Konstrukt:
Eine Klasse namens TMessung die das Interface IMessKnoten implementiert.
Ich brauche das Interface, für eine Virtual Tree View.
TMessung = class(TInterfacedObject, IMessKnoten);
Ich weise den Knoten in meinem TreeView über Data die Daten zu die sich hinter ihnen verbirgen. Also beispielsweise eine Instanz vom Typ TMessung. Dies muss ich aber über das Interface machen. Was soweit kein Problem ist. Aber wie bekomme ich in folgender Situation wieder ein Objekt vom Typ TMessung:
Delphi-Quellcode:
var
Messknoten: IMessKnoten;
begin
Data:= VST.GetNodeData(Node);
Messknoten := Data.Fobject;
// Jetzt soll Messknoten nach TMessung gecastet werden.
Wenn ich beim Debuggen Messknoten in die Liste der überwachten Ausdrücke ziehe steht bei Wert sogar da : TMessung(....).
Aber ein Cast ist mir trotzdem bisher nicht gelungen.
Vielen Dank euch schon mal im Vorraus.