8 respuestas en este tema

[cannabis]

Utilizo D7 e Indy 10.0.76

Descargué un ejemplo del maestro roman en la tienda de enfrente.
Con el ejecutable de muestra que tiene el ejemplo, no hay problema. Cuando abro el proyecto y lo compilo y ejecuto, es cuando despliega el error: 'could no load ssl library'.

Tengo los archivos libeay32.dll y ssleay32.dll en el directorio del proyecto. He cambiado la versión de los DLL, descargando por lo menos 10 versiones diferentes y sigue el mismo error.

¿Alguna sugerencia? Gracias.


Salud.

[eduarcol]

Desinstala las indy. Has un respaldo de la carpeta lib. Borra todos los archivos indy de esa carpeta por lo general comienza con ID  vuelve a instalar los indy.

Eso sucede porque al actualizar quedan archivos de la version vieja en esa carpeta.

Recuerda respaldar la carpeta lib antes de borrar

[cannabis]

Hola eduarcol, gracias por contestar.

Hice lo que explicaste. Desinstalé INDY 10, borré todo lo que oliera a Indy. Instalé de nuevo. Y el @#~€€¬ error continúa.

Desde hace dos días estoy en esto y no encuentro solución (centésima cuadragésima octava Ley de Murphy: Si algo no funciona, insiste en encontrar la solución hasta que enloquezcas o se acabe el mundo, lo que ocurra primero)
Dejo la liga para descargar el ejemplo de roman: aquí

Lo que me parece extraño con el ejemplo, es que el ejecutable de muestra funciona. Pero al abrir el proyecto con D7, y sin modificar absolutamente nada, y compilarlo y ejecutarlo, marca el error.


Salud.

[cannabis]

Algo muy curioso:

Cuando ejecuto por primera vez el programa, el error aparece. Estando aún abierto el programa y envío el correo nuevamente, lo hace bien. ¿¡¿¡¿¡¿¡!?!?!?!?

Concluyo que no carga las DLL al primer intentó ¿por qué?


Salud.

[cannabis]

Aunque uso una sentencia bastante conocida: Toda felicidad que no proviene del alcohol, es falsa. En esta ocasión estoy feliz de verdad.

La solución la encontré en la tienda de enfrente y es:

1.-  Agregar IdSSLOpenSSLHeaders en el uses.

2.- En el evento oncreate: IdSSLOpenSSLHeaders.Load;

Es todo.

Ahora podré ir a comer con mis mujeres y tomarme unas cervezas frías mientras la sra. Esposa liba los néctares de José (de José Cuervo, no sean mal pensados).


Salud.

[luk2009]

Creo que debes decir que es la tienda de enfrente porque es no es ningun problema. En delphiaccess no hay espacio para la mediocridad y darle los creditos a quien los tiene es lo correcto.

[cannabis]

Creo que debes decir que es la tienda de enfrente porque es no es ningun problema. ...

En el primer mensaje de este hilo hago referencia al maestro roman y pongo una liga a la tienda de enfrente.
Al llamar la tienda de enfrente al Club Delphi, no creo estar ofendiendo a nadie. He consultado, consulto y consultaré ambos foros y agradezco que existan (así no tengo que esforzarme tanto para solucionar mis problemas de programación)

... En delphiaccess no hay espacio para la mediocridad y darle los creditos a quien los tiene es lo correcto.

La verdad sea dicha, mi estimado luk2009, presumo de ser un excelente mediocre:

www.rae.es
mediocre.

(Del lat. mediocris).

1. adj. De calidad media.

2. adj. De poco mérito, tirando a malo.

Nunca he sido el peor ni el mejor en algo (con excepción del trompo), menos en computación. Aunque reconozco que en el mundo de la informática soy más del tipo de la segunda acepción.

Pero dejemos este asunto en paz. Si alguien se molestó en este foro o en la tienda de enfrente, pido que me disculpen. Yo, mientras tanto, brindaré por ustedes frente a unas Coronas bien helodias.

Salud.

[genyus00]

Hola, por si persiste el problema de la SSL. no es problema tanto de los indy sino mas bien que te flatan las Dll del caso.. yo tenia el mismo problema, y a la final lo soluciones, tengo mi apliocacioncita en delphi XE, con lo indy 10.5.7 y me baje las dll del link http://indy.fulgan.com/SSL/ , de alli baje  openssl-1.0.0d-i386-win32.zip y openssl-1.0.0d-x64_86-win64.zip , una para sistemas de 32 bits y la otra para los de 64 bits, y sannto remedio, un formulario con 3 edit y un memo, edit (de, para, asunto) y memo (cuerpo del mensaje),



y el codigo siguiente en el boton enviar..

delphi

procedure TfrmPrincipal.btnEnviarCorreoClick(Sender: TObject);
var
	Password: String;
 
begin
  idMessage.Clear;
  idMessage.FromList.EMailAddresses := txtRemitente.Text + '@gmail.com';
  idMessage.Recipients.EMailAddresses := txtDestinatario.Text;
	idMessage.Subject := txtAsunto.Text;
  idMessage.Body.AddStrings(mmoMensaje.Lines);
 
  if InputQuery('gMailSend', 'Contraseña del servidor', Password) then
  begin
  	idSMTP.Username := txtRemitente.Text;
    idSMTP.Password := Password;
 
    btnEnviarCorreo.Enabled := false;
 
    try
      if not idSMTP.Connected then
				idSMTP.Connect;
 
      idSMTP.Send(IdMessage);
    finally
    	btnEnviarCorreo.Enabled := true;
    end;
  end;
end;

[hugobenitez78]

Hola, por si persiste el problema de la SSL. no es problema tanto de los indy sino mas bien que te flatan las Dll del caso.. yo tenia el mismo problema, y a la final lo soluciones, tengo mi apliocacioncita en delphi XE, con lo indy 10.5.7 y me baje las dll del link http://indy.fulgan.com/SSL/ , de alli baje  openssl-1.0.0d-i386-win32.zip y openssl-1.0.0d-x64_86-win64.zip , una para sistemas de 32 bits y la otra para los de 64 bits, y sannto remedio, un formulario con 3 edit y un memo, edit (de, para, asunto) y memo (cuerpo del mensaje),



y el codigo siguiente en el boton enviar..

 

delphi

procedure TfrmPrincipal.btnEnviarCorreoClick(Sender: TObject);
var
	Password: String;
 
begin
  idMessage.Clear;
  idMessage.FromList.EMailAddresses := txtRemitente.Text + '@gmail.com';
  idMessage.Recipients.EMailAddresses := txtDestinatario.Text;
	idMessage.Subject := txtAsunto.Text;
  idMessage.Body.AddStrings(mmoMensaje.Lines);
 
  if InputQuery('gMailSend', 'Contraseña del servidor', Password) then
  begin
  	idSMTP.Username := txtRemitente.Text;
    idSMTP.Password := Password;
 
    btnEnviarCorreo.Enabled := false;
 
    try
      if not idSMTP.Connected then
				idSMTP.Connect;
 
      idSMTP.Send(IdMessage);
    finally
    	btnEnviarCorreo.Enabled := true;
    end;
  end;
end;

 

Genios!! todos, gracias por compartir sus conocimientos, casi me vuelvo loco. Dios los bendiga!