Treeview und Pagecontrol "verlinken"

[Andreas L.]

Hi,
ich hab ne TreeView und ne PageControl (mit mehreren TabSheets) auf meinen Form. Nun möchte ich wenn ein Item bzw. Subitem im TreeView angeklickt wird ein TabSheet anzeigen lassen. Jedes Item ein anderes TabSheet.

Das TabSheet anzeigen lassen kann ich z. B. so machen:

Pagecontrol1.activepage:=TabSheet1; Aber wo binde ich das ein damit bei jeden Item ein andere TabSheet angezeigt wird.

Bei der ListView geht das ja so:

Delphi-Quellcode:

begin
 case ListView1.Itemindex of
  0 : begin
       Pagecontrol1.ActivePage:=TabSheet1;
      end;
  1 : begin
       Pagecontrol1.ActivePage:=TabSheet2;
      end;
 end {case}
end;

Aber ich möchte die TreeView nehmen weil da auch Subitems möglich sind.

Wie mache ich das obere Code beispiel mit einer TreeView statt ListView?

Greetz und thx