mostrar Guage mientras envio correo

[jocey]

dec y omega, sus respuestas han sido como siempre sensacionales, a ver, a mi se me ocurrio crear el componente IdSMTP en tiempo de ejecuacion, se que estoy bloqueado con esto, nunca lo habia hecho y no me entra la forma de hacerlo, no lo logro cuadrar como lo voy a hacer... si me pueden ayudar bien y si no.... no hay problemas... ya bastantehan hecho.

[Omega]

Revisa esto:

Código Delphi [-]
 SMTP.OnWorkBegin := IdSMTPWorkBegin;
 SMTP.OnWork := IdSMTPWork;
 SMTP.OnWorkEnd := IdSMTPWorkEnd;

PD: Yo también quiero dar las gracias a dec, ya que con el post que cite antes he podido hacer para bajar un archivo con barra de progreso.