Hi.
Die einfachste Lösung ist oft, wenn du bei der Erstellung des TreeNode der Data-Eigenschaft den Zeiger auf das TabSheet zuweist:
TreeNode.Data := Pointer(TabSheet);
Du kannst dann später sehr einfach im Ereignis OnChange() der TreeView wieder darauf zugreifen:
Delphi-Quellcode:
procedure TDemoForm.TreeViewChange(Sender: TObject; Node: TTreeNode);
begin
if Assigned(Node) then
PageControl.ActivePage := TTabSheet(Node.Data);
end;
Grüße vom marabu