Форум » [x]Harbour » Как сделать таймер ? » Ответить
Как сделать таймер ?
Andrey: Всем привет. Использую хХарбор и терминал GTWVT. В своей программе вызываю чужую библиотеку (отправка письма через FastReport). Как можно повесить фоновое окошко с таймером на 60 сек ? Типа: "Подождите, идет отправка письма. Осталось 60 сек." (59, 58, .... и т.д.) В коде вызов идет так: S := FrPrn:SendMail("smtp.mail.ru", 25, ....., cTextField, cFileNames) // Тайм-аут 60 сек.
Ответов - 2
SADSTAR2: первая мысль перед вызовом SendMail создать окно WaitWindow с таймером и активировать его с параметром NOWAIT после выхода из Sendmail - WaitWindow .Release()
PSP: SADSTAR2 пишет: создать окно WaitWindow с таймером и активировать его с параметром NOWAIT после выхода из Sendmail - WaitWindow .Release() У него не ГУИ.
полная версия страницы