Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

progressbar


клоун ©   (2006-12-07 19:11:00) 

for i := 0 to listbox1.Count-1 do
begin
 Messages.Recipients.EMailAddresses :=listbox1.Items.Strings[i];
 IdSMTP1.Connect();
  If IdSMTP1.Connected then  IdSMTP1.Send(Messages);

в какое место всобачить прогрессбар,чтобы он показывал процесс?подскажите плиз

Спасибо!


Джо   (2006-12-07 19:26:00) [1]

> [2] Palladin ©   (07.12.06 19:23)
> смерть спамерам

смерть клоунам? :D


> в какое место всобачить прогрессбар,чтобы он показывал процесс?
> подскажите плиз

Никуда его "всобачивать" не нужно, пускай лежит на форме. А вот на что стоит обратить внимание, так это на события OnWorkBegin, OnWork, OnWorkEnd компонента TIdSMTP.


Palladin   (2006-12-07 19:23:00) [2]

смерть спамерам


Sam Stone   (2006-12-07 19:19:00) [3]

в любое между begin и end


Наверх

Титульная страница Поиск, карта сайта Написать письмо