Автор | Сообщение |
|
| постоянный участник
|
Пост 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 сек.
|
|
|
Ответов - 2
[только новые]
|
|
|
| |
Пост N: 127
Зарегистрирован: 05.06.07
|
|
Отправлено: 01.07.11 01:23. Заголовок: первая мысль перед ..
первая мысль перед вызовом SendMail создать окно WaitWindow с таймером и активировать его с параметром NOWAIT после выхода из Sendmail - WaitWindow .Release()
|
|
|
|
| постоянный участник
|
Пост N: 553
Зарегистрирован: 27.01.07
|
|
Отправлено: 01.07.11 08:36. Заголовок: SADSTAR2 пишет: соз..
SADSTAR2 пишет: цитата: | создать окно WaitWindow с таймером и активировать его с параметром NOWAIT после выхода из Sendmail - WaitWindow .Release() |
| У него не ГУИ.
|
|
|
|