über TIWTreeViewItem dazugehöriges TIWTreeView ermitteln

[hirnstroem]

Aus einem unerklärlichen Grund ist die TreeView property eines TreeView-Items als protected deklariert. Daher muss man einen kleinen Trick anwenden:

Delphi-Quellcode:

type
  TIWTreeViewItemCracker = class (TIWTreeViewItem)
end;

Delphi-Quellcode:

procedure ...
var
  LTreeView: TIWTreeView;
begin
  LTreeView :=  TIWTreeViewItemCracker(Sender as TIWTreeViewItem).TreeView;
  ...
end;