TTreeView auf Editieren stellen

[DGL-luke]

Also das ja wohl Pipifax^^

Delphi-Quellcode:

procedure TForm2.TreeView1Click(Sender: TObject);
var item, root, c1,c2: TTreeNode;
begin
  if (Sender as TTreeView).Selected <> nil then
    begin
      item := (Sender as TTreeView).Selected;
      c2 := item.Parent; //einfach nach oben durchhangeln, zur sicherheit könnte man zwischendurch auf <> nil testen
      c1 := c2.Parent;
      root := c1.Parent;
    end;
end;

Wenn der Baum NICHT fest ist, ich also nur von deinen Vorgaben OHNE das Bild ausgehen kann, wirds natürlich schwieriger.

EDIT: willst du es so machen, dass man belibig reinklicken kann?!
Dann ist mein Ansatz... ungeeignet.