Skip to content
This repository has been archived by the owner on Nov 22, 2018. It is now read-only.

Latest commit

 

History

History
20 lines (16 loc) · 425 Bytes

example1.md

File metadata and controls

20 lines (16 loc) · 425 Bytes

Delphi import unit per OpenSSL DLL

How to get OpenSSL DDL version

Leggere la versione della DLL di OpenSSL

function GetVersion: string;
var
  v: cardinal;
  s: PChar;
begin
v := SSLeay;
s := SSLeay_version(_SSLEAY_CFLAGS);
result := s + ' (' + IntToHex(v, 9) + ')';
end;

Result is described in OPENSSL_VERSION_NUMBER(3) man page

Il risultato è descritto nel pagina man OPENSSL_VERSION_NUMBER(3)