Wenn es mehrere gibt, dann kannst du aber nicht nur eins als Rückgabewert bekommen?!
Also vielleicht so...
Delphi-Quellcode:
type
TSelectedTreeNodes = array of TTreeNode;
:
:
function GetNodeByText(ATree: TTreeView; AValue:String): TSelectedTreeNodes;
var Node: TTreeNode;
begin
setlength(Result, 0);
Node := ATree.Items.GetFirstNode;
while assigned(Node) do begin
if UpperCase(Node.Text) = UpperCase(AValue) then begin
setlength(Result, length(Result)+1);
Result[high(Result)] := Node;
end;
Node := Node.GetNext;
end;
end;
Gruss
Thorsten