Ver Mensaje Individual
  #53  
Antiguo 02-06-2025
_Io _Io is offline
Miembro
 
Registrado: ene 2024
Posts: 114
Reputación: 3
_Io Va por buen camino
Cita:
Empezado por razorxxx Ver Mensaje
Nada, olviden lo anterior. Seguía dando problemas para conectar, porque faltaba asignarle el certificado al objeto HTTPReqResp, parece ser que me estaba cogiendo el primero que veía en el almacén de certificados.

Pero lo he solucionado. Todo es más fácil de lo que pensaba.

El método
Código Delphi [-]
HTTPRIOHTTPWebNode1BeforePost(const HTTPReqResp: THTTPReqResp; Client: THTTPClient)
debe quedar así:

Código Delphi [-]
var
   CertStream: TMemoryStream;
begin
     CertStream := TMemoryStream.Create;
     CertStream.LoadFromFile(Cert.Text);
     HTTPReqResp.ClientCertificate.Stream := CertStream;
     HTTPReqResp.ClientCertificate.Password := Pwd.Text;
end;

Ahora ya puedo seleccionar el certificado que quiera antes de cualquier petición y prescindir de la librería CAPICOM.

Saludos.
Buenos día.

Estoy intentando utilizar este procedimiento para asignar el certificado (ClienteCertificate.Stream), pero no me funciona, he abierto este hilo con los problemas que tengo.
Si te funciona, me puedes decir como lo haces?, algo se me debe estar pasando.

Muchas gracias.
Responder Con Cita