Indy 10 y sslvTLSv1_2

[cervexa]

Empezado por jars

si, estan en la misma carpeta del ejecutable

Si has conseguido solucionarlo.
Estoy con tu mismo problema. Tengo Delphi XE.
Podrías facilitarme donde puedo encontrar las Indy 10.6 y las dll adecuadas para sslvTLSv1_2
O explicar como lo has solucionado. Gracias

[Casimiro Notevi]

Empezado por cervexa

Si has conseguido solucionarlo.
Estoy con tu mismo problema. Tengo Delphi XE.
Podrías facilitarme donde puedo encontrar las Indy 10.6 y las dll adecuadas para sslvTLSv1_2
O explicar como lo has solucionado. Gracias

¿No te sirven las que están enlazadas en unos mensajes más arriba?

[cervexa]

El problema es que las he copiado al directorio del exe, a windows, a windows/system32 y me dice que no consigue cargarlas.
No sé que hacer.
Por cierto, esas dll permiten trabajar con tls 1.2?

IdIOHandler.SSLOptions.SSLVersions := [sslvTLSv1_2];

Por otro lado la versión de las Indy que tengo (Delphi XE) en el objecto SSLOptions.SSLVersions no me ofrece ese valor. Por esto creo que tengo que actualizar las indy a la versión 10.6. Solo me ofrece el valor sslvTLSv1
Gracias por contestar

[pablog2k]

te va a tocar actualizar las librerías INDY , nosotros pasamos por una situación similar con Delphi XE

[cervexa]

Empezado por pablog2k

te va a tocar actualizar las librerías INDY , nosotros pasamos por una situación similar con Delphi XE

A que versión las actualizasteis y, sobre todo, donde las puedo descargar, así como las DLL de Openssh correspondientes?
Gracias

[Casimiro Notevi]

Con esa versión tiene que funcionar.

Empezado por cervexa

Si pongo un IdSSLIOHandlerSocketOpenSSL en el formulario y voy a las opciones de SSL en el parametro de SSLVersions me ofrece solamente: sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1. Mi impresión es que debería ofrecerme tambien sslvTLSv11 y sslvTLSv12.

Puedes probar con la sslvTLSv1, de todas formas me parece raro que hoy en día estén usando una versión tan antigua.

[cervexa]

Gracias por responder.
No consigo que funcione, me da "Cold not load SSL library" al intentar conectar.
He copiado las DLL que posteaste arriba en el directorio del ejecutable, en c:\windows, en c:\windows\system, en c:\windows\system32... y no consige cargarlas.

El código que utilizo, en el que he ido cambiando las opciones en todas las combinaciones posibles, es este

var
  IdSSLIOHandlerSocket: TIdSSLIOHandlerSocketOpenSSL;
  IdSMTP: TIdSMTP;
  IdMessage: TIdMessage;
  IdText: TIdText;
  sAnexo: string;
begin
  IdSSLIOHandlerSocket := TIdSSLIOHandlerSocketOpenSSL.Create(Self);
  IdSMTP := TIdSMTP.Create(Self);
  IdMessage := TIdMessage.Create(Self);

  try
    with IdSSLIOHandlerSocket do begin
      SSLOptions.Method := sslvTLSv1;
      SSLOptions.Mode := sslmClient;
      SSLOptions.SSLVersions := [ sslvTLSv1 ];
    end;

    with IdSMTP do begin
      IOHandler := IdSSLIOHandlerSocket;
      UseTLS := utUseImplicitTLS;
      AuthType := satDefault;
      Port := 465;
      Host := 'smtp.micuenta.com';
      Username := 'rrhh@micuenta.com';
      Password := '7f6a8907sdfas';
    end;

    with IdMessage do begin
      From.Address := 'rrhh@micuenta.com';
      From.Name := 'Nome do Remetente';
      ReplyTo.EMailAddresses := IdMessage.From.Address;
      Recipients.Add.Text := unacuaneta@gmail.com';
      Recipients.Add.Text := 'otra@cuenta.com';
      Recipients.Add.Text := 'otra@distinta.com';
      Subject := 'Prueba de e-mail';
      Encoding := meMIME;
    end;

    IdText := TIdText.Create(IdMessage.MessageParts);
    with IdText do begin
      Body.Add('Corpo do e-mail');
      ContentType := 'text/plain; charset=iso-8859-1';
    end;

// ====================================================
// AQUI DA EL ERROR DE CONEXION--> Could not load SSL library
// ====================================================
    try
      IdSMTP.Connect;
      IdSMTP.Authenticate;
    except
      on E:Exception do
      begin
        MessageDlg('Error en la conexión o autentificación: ' +
          E.Message, mtWarning, [mbOK], 0);
        Exit;
      end;
    end;

    try
      IdSMTP.Send(IdMessage);
      MessageDlg('Mensaje enviado', mtInformation, [mbOK], 0);
    except
      On E:Exception do
      begin
        MessageDlg('Error al enviar el mensaje: ' +
          E.Message, mtWarning, [mbOK], 0);
      end;
    end;
  finally
    IdSMTP.Disconnect;
    UnLoadOpenSSLLibrary;
    FreeAndNil(IdMessage);
    FreeAndNil(IdSSLIOHandlerSocket);
    FreeAndNil(IdSMTP);
  end;
end;

Creo que pasan estas cosas:
-- No tengo la última version de las Indy: 10.6, que son las que ofrecen TLS1.2 aunque creo que el error es antes de llegar a utilizar el TLS, está en la carga de las DLL.
-- Mis indy y las DLL no deben de ser compatibles
Por esto estoy tratando de conseguir las Indy 10.6 y la última versión de openSSH ya compilada, por que no sabría hacerlo con los fuentes

No sé si me puedes ayudar en esto.
Un saludo

[pablog2k]

Empezado por cervexa

A que versión las actualizasteis y, sobre todo, donde las puedo descargar, así como las DLL de Openssh correspondientes?
Gracias

Hola, perdona por tardar ,las descargué de aquí:
https://github.com/IndySockets/Indy
las que pone 150 son las que corresponden a Delphi XE
Aun así es un proceso bastante costoso, ya que tienes que eliminar de tu sistema todo rastro de las indy antiguas y luego instalar las indy nuevas.

Si has conseguido salir del paso con un proyecto en angular, mejor

[cervexa]

Gracias, por tu respuesta. Si, estoy acabando la aplicación nueva,
Un saludo

[DenisDiaz]

Tengo Delphi 10.4 y me conecto a Postgres, me funcionó bien hasta postgres 12 pero al actualizar a postgres 16 me da este error:

[FireDAC][Phys][PG][libpq] SSL error: tlsv1 alert protocol version
FATAL: no pg_hba.conf entry for host "190.67.60.74", user "neodent", database "bd_comun", no encryption

Entiendo que debo actualizar la librería pero no veo donde o cómo.
Si alguien me puede ayudar le agradezco.

[Casimiro Notevi]

Empezado por DenisDiaz

Tengo Delphi 10.4 y me conecto a Postgres, me funcionó bien hasta postgres 12 pero al actualizar a postgres 16 me da este error:

[FireDAC][Phys][PG][libpq] SSL error: tlsv1 alert protocol version
FATAL: no pg_hba.conf entry for host "190.67.60.74", user "neodent", database "bd_comun", no encryption

Entiendo que debo actualizar la librería pero no veo donde o cómo.
Si alguien me puede ayudar le agradezco.

¿Qué cifrado tienes para esa conexión en pg_hba.conf?

[NANAUJ1970]

Tengo unas dudas con las librerias.
Estaba usando hasta ahora D6 y acabo de instalar D7 y cuando quiero usar librerias tipo:

System.SysUtils, System.Classes, Soap.Rio, Xml.XMLIntf, Soap.SOAPHTTPClient, Soap.SOAPHTTPTrans etc

me dice que no encuentra el .dcu....

Alguien pude ayudarme por favor diciendome donde se encuentran y como instalarlas

Gracias de antemano

[Casimiro Notevi]

Empezado por cervexa

...

¿Qué versión de indy tienes?

[cervexa]

Empezado por Casimiro Notevi

¿Qué versión de indy tienes?

No tengo muy claro como mirarlo, pero en C:\Program Files (x86)\Embarcadero\RAD Studio\8.0\source\Indy10\System\IdVers.inc

tengo esto:

  gsIdVersion = '10.5.7'; {do not localize}
  gsIdProductName = 'Indy';  {do not localize}

Si pongo un IdSSLIOHandlerSocketOpenSSL en el formulario y voy a las opciones de SSL en el parametro de SSLVersions me ofrece solamente: sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1. Mi impresión es que debería ofrecerme tambien sslvTLSv11 y sslvTLSv12.

Teneis que perdonar mi ignorancia pero programé en Delphi hace más de 10 años y estoy muy fuera de onda. Tengo que hacer unos arreglos en el envio de correos con autentificacion TLS en un servidor smtp y voy muy perdido.
Gracias por la ayuda.