Fórum Componentes Indy - E-mail com ProgressBar #189406

Caros, desenvolvi uma aplicação para envio de email, logo coloquei uma progressbar para fazer o acompanhamento de envio da mensagem, só que eu vi um artigo na net falando para usar os métodos : OnWork e OnBeginWork, até ai tudo bem, inserir no OnWorK:

ProgressBar1.Position := AWorkCount;

e no OnBeginWork:

ProgressBar1.Max := AWorkCountMax;
ProgressBar1.Position :=0;

só que no AWorkCountMax ele está passando 0, o que está acontecendo? Existe outra forma de fazer a barra de progresso funcionar? Estou utilizando os componentes Indy 9.

Obrigado pela ajuda.

[i:ebb8c02b4b]Título editado. Leia as [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=6689&sid=add834b4ed94967502cf2381c38e751a][u:ebb8c02b4b]Regras de Conduta[/u:ebb8c02b4b][/url]. (marcelo.c – Moderador)[/i:ebb8c02b4b]