FIX: Use case insensitive search

This commit is contained in:
Alexander Koblov 2022-02-07 19:12:26 +03:00
commit 705aa37bb1

View file

@ -53,7 +53,7 @@ begin
while (PByte(pImpDesc) < pEnd) and (pImpDesc^.FirstThunk <> 0) do
begin
if StrComp(@pModule[pImpDesc^.Name], pLibName) = 0 then
if StrIComp(@pModule[pImpDesc^.Name], pLibName) = 0 then
begin
Result := @pModule[pImpDesc^.FirstThunk];
Exit;