1
0
mirror of synced 2024-12-22 09:13:07 +01:00

Fixed: Exists implementation failed for different keys with the same hash value

This commit is contained in:
Mark van Renswoude 2004-09-05 13:48:19 +00:00
parent 72f1763ea1
commit 011897142c

View File

@ -415,8 +415,11 @@ begin
end;
function TX2CustomHash.Exists;
var
pNode: PX2BTreeNode;
begin
Result := inherited Exists(Hash(AKey), ASetCursor);
Result := Assigned(LookupItem(AKey, pNode, False, ASetCursor));
end;