VirtualTreeView filtern

[Hawkeye219]

Hallo Michael,

du könntest den Baum auch rückwärts durchlaufen (GetLast/GetPrevious) und bei jedem Knoten die Sichtbarkeit in Abhängigkeit des Knotentyps festlegen:

Delphi-Quellcode:

Node := treeAccounts.GetLast;
while Node <> nil do
begin
  Data := treeAccounts.GetNodeData(Node);

  if "Node ist ein Ordnerknoten" then
    treeAccounts.IsVisible[Node] := Assigned(treeAccounts.GetFirstVisibleChild(Node))
  else
    treeAccounts.IsVisible[Node] := MatchStr(Data^.Caption, Text, False);

  Node := treeAccounts.GetPrevious(Node);
end;

Die Bestimmung des Knotentyps musst du noch einbauen. Vergiss auch das fehlende treeAccounts.EndUpdate nicht...

Gruß Hawkeye