Hallo Community,
Ich möchte gern die "class"
TTreeNode um einen Word-Wert erweitern, dabei aber den Klassen-Namen beibehalten. So, wie es im unten stehenden Code geschrieben steht, funktioniert es aber leider nicht.
Delphi-Quellcode:
type
TTreeNode{Ex} = class(TTreeNode)
private
{ Private declarations }
GroupID: Word;
end;
Ich habe es zuerst mit dem Namen
TTreeNodeEx versucht, allerdings nimmt dann ein TreeView dieses Item nicht mehr an. Ich möchte nun nicht noch die TreeView-Klasse umschreiben, weil es einfacher ist, mit einer
VCL-Treeview zu arbeiten. Außerdem gefällt mir die
Data-Variante auch nicht so sehr => ein wenig umständlich und weniger übersichtlich.
Weiß da jemand eine Lösung?