JavierBechir

I've installed 11.1 version of Rad Studio, but into GetIt package manager doesn´t see the new 11.2 version. I supose, must download and install as trial, and when installing, recognizes the 11.1 version and uses same licence.... or not? Can I tread down the 11.1 with 11.2 withot lost any? I need explanation about it. Thanks!

I use LoadFromP12File. I see a new variable: GSSL_DLL_DIR; GSSL_DLL_DIR := Copy(ExtractFileDir(GetModuleName(HInstance)),5,255) +'\'; Now it's ok, but raises error when load certificate: access denied, but folder has R/W permissions ... I'll be investigating more. Thanks

I've downloaded the 8.65 version, installed and runed... libeay32 and ssleay32 are replaced by libcrypto-1_1 and libssl-1_1 dlls. Now is worst. Both in development pc, and server same exception is raised "Failed to load OpenSSL file libcrypto-1_1.dll ". Both dll are in same folder than my application!! 😞

I've installed component suit from overbyteics 8.16 in XE8 Delphi (Rad Studio). When i want to open a p12 file in developer computer, it loads, but when application runs on Windows Server 2012 R2 raises "\r\nError on opening file \"c:\\Files\\certif\\clientkstore.p12\"\r\nerror:02001005:system library:fopen:Input\/output error\r\nerror:2006D002:BIO routines:BIO_new_file:system lib\r\n" message. Development pc has openssl64 installed. W2012 R2 server: not. c:\Files folder has high permissions for application users, for reading and writing. The error is raised from OverbyteIcsWSocket unit: 2procedure myprocedure(myKey: string; var X: PPKC512; var Y: PX509); var path: string; FileBio : PBIO; PKey : PEVP_PKEY; ca: PSTACK; begin path := 'c:\Files\certif\clientkstore.p12'; // read from ini or register InitializeSsl; FileBio := OpenFileBio(path, bomRead); //<-- here raises. See next function down try if not Assigned(FileBio) then raise EX509Exception.Create('BIO not assigned'); X := f_d2i_PKCS12_bio(FileBio, nil); if not Assigned(X) then RaiseLastOpenSslError(EX509Exception, TRUE, 'Error reading certificate from BIO PKC512'); try if IncludePrivateKey then begin f_BIO_ctrl(FileBio, BIO_CTRL_RESET, 0, nil); PKey := f_PEM_read_bio_PrivateKey(FileBio, nil, nil, PAnsiChar(AnsiString(Password))); if not Assigned(PKey) then RaiseLastOpenSslError(EX509Exception, TRUE, 'Error reading private key from BIO'); try X509 := X; PrivateKey := PKey; finally f_EVP_PKEY_free(PKey); end; end else P12 := X; f_PKCS12_parse(P12, myKey, PKey, Y, ca); X509 := Y; finally f_PKCS12_free(X); end; finally f_bio_free(FileBio); end; end; //........................................................................................// function TX509Base.OpenFileBio( const FileName : String; Methode : TBioOpenMethode): PBIO; begin if (Filename = '') then raise EX509Exception.Create('File name not specified'); if (Methode = bomRead) and (not FileExists(Filename)) then raise EX509Exception.Create('File not found "' + Filename + '"'); if Methode = bomRead then Result := f_BIO_new_file(PAnsiChar(AnsiString(Filename)), PAnsiChar('r+')) //<------ here raises else Result := f_BIO_new_file(PAnsiChar(AnsiString(Filename)), PAnsiChar('w+')); if (Result = nil) then RaiseLastOpenSslError(EX509Exception, TRUE, 'Error on opening file "' + Filename + '"'); end; ssleay32.dll and libeay32.dll are in same folder than app. How can solve it?