Node aus Treeview löschen

[Sir Rufo]

Ich weiß ja nicht mit welchem Kraut du dich da verngügst, scheint aber recht starkes Zeug zu sein.

Wenn wir alle von der VCL sprechen, dann läuft man einfach über die Kinder des zu löschenden Eintrags und führt für jedes Kind die Methode VCL.ComCtrls.TTreeNode.MoveTo aus.

Delphi-Quellcode:

procedure SaveChildren( ANode : TTreeNode );
var
  LChild : TTreeNode;
begin
  while ANode.HasChildren do
  begin
    LChild := ANode.getFirstChild;
    LChild.MoveTo( ANode, naInsert );
  end;
end;