想找一个TREEVIEW 的递归删除某个节点的问题(此节点有子节点)
主要是写一个同DeleteChildren 一样的函数,因为我用的TREEVIEW 里面没有
DELETECHILDREN 这个函数

解决方案 »

  1.   

    太简单了
    TTreeNode就有删除节点的函数 也有判断是否有子节点的函数
      

  2.   

    if Treeview1.Items[0].HasChildren then
         begin
             
           Treeview1.Items[i].Delete;
         end;
      

  3.   

    干嘛要判断有没有子节点?干嘛要递归?procedure TForm1.TreeView1Click(Sender: TObject);
    begin
      Treeview1.Items.Delete(Treeview1.Selected);
    end;无论有无子节点,一律删除;有子节点的,无论有几层,一律统统删除;干净利落