Einzelnen Beitrag anzeigen

Benutzerbild von DGL-luke
DGL-luke

Registriert seit: 1. Apr 2005
Ort: Bad Tölz
4.149 Beiträge
 
Delphi 2006 Professional
 
#4

Re: TreeView: TreeNode am Text erkennen

  Alt 10. Jul 2007, 17:59
da musst du rekursieren.

Delphi-Quellcode:
function getNodesWString(Node: TVirtualTreeNode; Text: string): TList;
var i: Integer;
l: TList;
begin
  Result := TList.Create;

  for i := 0 to Node.ChildNodes.Count-1 do
  begin
    if Pos(Node.ChildNodes[i].GetText, Text) > 0 then
      Result.Add(Node.ChildNodes[i]);

    l := getNodeswstring(Node.Childnodes[i],Text);
    Result.assign(l, laCopy);
    l.Free;
    
  end;
end;
So in etwa.
Lukas Erlacher
Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1
  Mit Zitat antworten Zitat