On-line: Avf, гостей 1. Всего: 2 [подробнее..]
АвторСообщение
постоянный участник




Пост N: 1810
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 30.06.11 11:41. Заголовок: Как сделать таймер ?


Всем привет.
Использую хХарбор и терминал GTWVT. В своей программе вызываю чужую библиотеку (отправка письма через FastReport).
Как можно повесить фоновое окошко с таймером на 60 сек ?
Типа: "Подождите, идет отправка письма. Осталось 60 сек." (59, 58, .... и т.д.)

В коде вызов идет так:
S := FrPrn:SendMail("smtp.mail.ru", 25, ....., cTextField, cFileNames) // Тайм-аут 60 сек.

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 2 [только новые]





Пост N: 127
Зарегистрирован: 05.06.07
ссылка на сообщение  Отправлено: 01.07.11 01:23. Заголовок: первая мысль перед ..


первая мысль

перед вызовом SendMail
создать окно WaitWindow с таймером и активировать его с параметром NOWAIT

после выхода из Sendmail - WaitWindow .Release()

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 553
Зарегистрирован: 27.01.07
ссылка на сообщение  Отправлено: 01.07.11 08:36. Заголовок: SADSTAR2 пишет: соз..


SADSTAR2 пишет:

 цитата:
создать окно WaitWindow с таймером и активировать его с параметром NOWAIT
после выхода из Sendmail - WaitWindow .Release()


У него не ГУИ.

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 102
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет