Treeview Node hinzufügen ???

[xaromz]

Hallo,

• Du musst natürlich den Knoten angeben, unter dem Du einen neuen anhängen willst. In Deinem Code ist LNode nicht initialisiert. Das meldet aber der Compiler auch.
• Außerdem kannst Du Dir die Schleife sparen (TTreeNode.Selected ist entweder der selektierte Knoten oder nil).
• Benutze AddChild

So ist's besser:

Delphi-Quellcode:

procedure TForm3.Hinzufugen1Click(Sender: TObject);  
var
  LNode: TTreeNode;  
begin  
  LNode := KatList.Items.AddChild(KatList.Selected, label1.Caption);
end;

Gruß
xaromz