TreeView1.Selected.Data und Typenkonvertierungsfehler

[ozz]

Guten Zusammen.
irgendwie habe ich immer Probleme mit Typenkonvertierungen . Bei den Beispiel bekomme ich immer die Meldung:
Inkompatible Typen TCLCategory und Char.
Irgendwie ist da aber kein Char Typ. TCLCategory ist ein Record nur aus Integern. Und laut Doku ist Data vom Typ Pointer. Das Hinzufügen funktioniert auch. Nur bei Auslesen bekomme ich obigen Fehler.

Danke für die Tips.

Delphi-Quellcode:

procedure TForm1.ActionShowCategoryDetailsExecute(Sender: TObject);
var CLCategory:TCLCategory;
begin
CLCategory:=^TCLCategory(TreeView1.Selected.Data)^;
end;