Registriert seit: 1. Apr 2005
Ort: Bad Tölz
4.149 Beiträge
Delphi 2006 Professional
|
Re: TreeView: TreeNode am Text erkennen
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
|