Treeview-node mit eine PageControl TabSheet kuppeln?

[bigg]

moin,

Items sind alle Knoten im TreeView.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Node: TTreeNode;
begin
Node := TreeView1.Items.Add(nil, 'Test');
Node.StateIndex := 1;
end;