Thema: Delphi Treeview

Einzelnen Beitrag anzeigen

barf00s
(Gast)

n/a Beiträge
 
#2

Re: Treeview

  Alt 21. Jul 2005, 10:07
die dinger heißen "Node" und nicht "Note"

Delphi-Quellcode:
var
  xNode: TTreeNode;

begin
  xNode := TreeView1.GetFirst;
  while xNode <> nil do begin
    if xNode.Text = 'whateverthen
      TreeView1.Items.Delete(TreeView1.Items.IndexOf(xNode))
    xNode := TreeView1.GetNext; // oder GetNextSibling
  end;
end;
andere möglichkeit wäres wohl einfach durch die items zu loopen und dann den passenden node zu löschen

Delphi-Quellcode:
for I := TreeView1.Items.Count - 1 downto 0 do
  if TreeView1.Items[I].Text = 'whateverthen
    TreeView1.Items.Delete(I);
kA bin kein großer fan vom TTreeView aber so in etwa wirds wohl funktionieren
  Mit Zitat antworten Zitat