почтовик-шкала загрузки - Работа с сетью в Delphi

betirsolt · 30.11.2009, 21:08

все привет,написал прогу для отправки письма на майл,с прикрепленным файлом.собственно вопрос,как мне сделать шкалу загрузки,чтоб отображался процесс передачи письма,или как нибудь в кбайтах,сколько передано и сколько осталось

Код:

idsmtp1.Connect;
   infolabel.Caption:='Отправка письма...';
   idSMTP1.Send(IdMessage1);
   infolabel.Caption:='письмо отправлено!';
   idSMTP1.Disconnect;

при этом сообщение Отправка письма... не выводиться(видимо из за того что при передаче все остальное блокируеться)и как использовать idantifreeze??его достаточно просто установить на форму??как его настроить

Adamrus · 30.11.2009, 21:12

Добавь ProgressBar, свойствуй Max:='размер файла', там Integer, пусть 1 кбайт == 1целочисленному, затем свойству Posithion плюсуй при передаче каждого кбайта еденичку, вот все.

mihali4 · 30.11.2009, 21:31

При чем тут "Общие вопросы"?
Есть раздел "Работа с сетью в Delphi".
Переношу.
А вот там потрудитесь поискать множество ответов на множество аналогичных вопросов.

30.11.2009, 21:08	#1
betirsolt Форумчанин Регистрация: 20.07.2009 Сообщений: 421	почтовик-шкала загрузки все привет,написал прогу для отправки письма на майл,с прикрепленным файлом.собственно вопрос,как мне сделать шкалу загрузки,чтоб отображался процесс передачи письма,или как нибудь в кбайтах,сколько передано и сколько осталось Код: `idsmtp1.Connect; infolabel.Caption:='Отправка письма...'; idSMTP1.Send(IdMessage1); infolabel.Caption:='письмо отправлено!'; idSMTP1.Disconnect;` при этом сообщение Отправка письма... не выводиться(видимо из за того что при передаче все остальное блокируеться)и как использовать idantifreeze??его достаточно просто установить на форму??как его настроить Уважаемые модераторы, Я всячески стараюсь не нарушать правила сайта, будьте снисходительны

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Шкала деления	Grots	Microsoft Office Excel	1	08.11.2009 00:55
Почтовик на Delphi- ошибка	REloadED	Работа с сетью в Delphi	14	26.08.2009 15:23
Как настроить почтовик?	Naruto.	Операционные системы общие вопросы	10	06.05.2009 01:15
почтовик	ben95	Работа с сетью в Delphi	1	02.02.2008 15:57

30.11.2009, 21:12	#2
Adamrus Пользователь Регистрация: 26.11.2009 Сообщений: 59	Добавь ProgressBar, свойствуй Max:='размер файла', там Integer, пусть 1 кбайт == 1целочисленному, затем свойству Posithion плюсуй при передаче каждого кбайта еденичку, вот все.

30.11.2009, 21:31	#3
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	При чем тут "Общие вопросы"? Есть раздел "Работа с сетью в Delphi". Переношу. А вот там потрудитесь поискать множество ответов на множество аналогичных вопросов.