在我的Delphi(10.3社区版)程序中,我尝试将Indy与OpenSSL库一起使用,但是收到错误消息
无法加载SSL库
我的OpenSSL库的版本为1.0.2u,我将libeay32.dll
和ssleay32.dll
文件放在程序EXE目录以及Windows\SYSWOW64
和Windows\System32
中。
我已经安装了Embarcadero Delphi补丁RS1033_Indy_SSL_Patch。
例外后,我致电WhichFailedToLoad()
,结果是
无法加载libeay32.dll
这是一个引发异常的简单程序:
url := 'https://www.google.it';
try
Web := TIdHTTP.Create(nil);
hIOHand := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
hIOHand.SSLOptions.SSLVersions := [sslvTLSv1,sslvTLSv1_1,sslvTLSv1_2,sslvSSLv23];
Web.IOHandler := hIOHand;
Web.Request.UserAgent := INET_USERAGENT; //Custom user agent string
Web.RedirectMaximum := INET_REDIRECT_MAX; //Maximum redirects
Web.HandleRedirects := INET_REDIRECT_MAX <> 0; //Handle redirects
Web.ReadTimeOut := INET_TIMEOUT_SECS * 1000; //Read timeout msec
try
Sito := Web.Get(Url);
Sito := DateToStr(Web.Response.LastModified) + Sito;
except
on e : exception do
stg := WhichFailedToLoad();
end;
finally
Web.Free;
end;
您能帮我解决问题吗?
答案 0 :(得分:2)
我将
libeay32.dll
和ssleay32.dll
文件放在程序EXE目录中
很好。这是操作系统寻找它们的第一位。
以及
Windows\SYSWOW64
和Windows\System32
不要那样做!非系统文件不属于此处。特别是如果要在两个文件夹中放入相同文件,因为Windows\SYSWOW64
仅适用于32位文件,Windows\System32
仅适用于64位文件。
无法加载libeay32.dll
这意味着Windows无法将DLL完全加载到内存中。可能是因为它找不到依赖的ssleay32.dll
文件,但更有可能是因为您混合了DLL的32位和64位版本。如果您的应用程序被编译为32位EXE,则必须使用两个DLL的32位版本。如果您的应用程序被编译为64位EXE,则必须使用两个DLL的64位版本。