anchor.diff:        TLog.NewLog(ltError,'OpenSSL',err);
         Raise Exception.Create(err);
       end;
  +    {$IFNDEF OpenSSL10}
       If Not Assigned(OpenSSL_version_num) then begin
         err := 'OpenSSL library is not v1.1 version: '+SSL_C_LIB;
         TLog.NewLog(ltError,'OpenSSL',err);
  
positive.code: begin
    p := BN_bn2dec(FBN);
    {$IFDEF NO_ANSISTRING}
    Result := p^; // TODO: Not tested when AnsiString not available!
    {$ELSE}
    Result := StrPas(p);
    {$ENDIF}
  
negative.code: begin
    p := BN_bn2hex(EC_KEY_get0_private_key(Key));
    {$IFDEF NO_ANSISTRING}
    Result := UBaseTypes.StrPas(p); // TODO: Not tested when AnsiString not available!
    {$ELSE}
    Result := StrPas(p);
    {$ENDIF}
  