Enviar un e-mail con delphi 7

[[AzidRain]]

Precisamente Fenix, para empezar recuerda siempre usar la versión mas actualizada posible (y estable) de cada componente que usas. Por otor lado actualmente hay muchos proveedores de correo que cambian sus protocolos por seguridad. LO que te funciona con uno no necesariamente te va a funcionar con otro.

Finalmente tu código está mal estructurado en la captura de las excepciones pues "El mensaje se envió correctamente" siempre se ejecutará aún cuando haya algun error. Te esta sobrando ese try que pusiste, debe quedar asi:

Código Delphi [-]
try
       indySMTP.Connect;
       indySMTP.Send(mailMensaje);
       showmessage('El mensaje se envió correctamente');
  except
       showmessage('Se produjo un fallo durante el envío del mensaje');
   end;

De esta forma si se genera una excepción todo salta a "Se produjo un fallo..." y nunca verás el otro mensaje. Si todo va bien, verás "El mensaje se envió..."

[FENIXadr]

Hola AzidRain... gracias por la correccion, si es cierto lo que decís.. la mayor parte del código es sacado de distintos lugares de la red y no presté demaciada atención a ese "try" de mas... lo que más me preocupaba era la forma de enviar el mail y ni bien lo pude hacer lo publique... pero me parece muy bueno tu aporte porque para eso estamos.. para ayudar a otros y ser ayudados en el proceso...

[[kurono]]

como funcionaria para hotmail

[FENIXadr]

Hola kurono.. te cuento que he estado investigando el tema y me da el famoso error #10060 de timed out, se suponía que cambiando el Host y el Port debería funcionar pero no es así... no se si será problema de las librerias SSL, serán diferentes para Hotmail que para GMail.. no se.. la cosa es que el código que publiqué arriba funciona perfectamente con GMail pero no funciona con Hotmail... si alguien puede darnos una mano.. aqui estamos...

(Estoy trabajando con Delphi 7 e Indy 9)