gefunden
Ich habe beim Zuweisen von .Data eines TreeItem "Pointer(XMLAttribute)" geschrieben, weil ich mit Interfaces am spielen war.
Hatte nicht fertig aufgeräumt.
Der korrekte Aufruf ist natürlich
TreeItem.Data := Object
, nicht
TreeItem.Data := Pointer(Object)