From ce22bc9ad1ceae20973dc3488340bbdbefdd196b Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 17 Dec 2011 14:02:35 +0000 Subject: [PATCH] lazutils: fixed TStringToStringTree.FindNode git-svn-id: trunk@34245 - --- components/lazutils/avglvltree.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/lazutils/avglvltree.pas b/components/lazutils/avglvltree.pas index 6cd5bc9d20..edc67b3dec 100644 --- a/components/lazutils/avglvltree.pas +++ b/components/lazutils/avglvltree.pas @@ -1839,7 +1839,7 @@ end; function TStringToStringTree.FindNode(const Name: string): TAvgLvlTreeNode; begin - Result:=FItems.FindKey(@Name,FCompareNameWithItem); + Result:=FItems.FindKey(Pointer(Name),FCompareNameWithItem); end; function TStringToStringTree.GetNode(Node: TAvgLvlTreeNode;