[fpc-devel] OpenSSL

Dave Connolly menounsef at gmail.com
Wed May 22 12:25:38 CEST 2019


Hi all,

Would it be possible to add the following function to openssl.pas?

_OpenSSLVersion := GetProcAddr(SSLLibHandle, 'OpenSSL_version');

.
.
.

function OpenSSLGetVersion(t: cint):String;
begin
  if InitSSLInterface and Assigned(_OpenSSLVersion) then
    Result := _OpenSSL_version(t)
  else
    Result := '';
end;


Many thanks,
David
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20190522/315d9701/attachment.html>


More information about the fpc-devel mailing list