Таймер на MsgBox

Автор OOKapitan, 30 января 2018, 17:18

0 Пользователи и 1 гость просматривают эту тему.

dimmon777

#45
Цитата: rami от 21 марта 2018, 21:13rami
Согласен что в коде много лишнего, надергал половину от сюда, половину из Питоньяка. Эта часть так вообще ахинея и отсебятина :o t=10000'устанавливаем счетчик
do
if MustBeClose then exit sub
t=t-220
wait (200)
if t = 0 or t < 0 then goto ii
p=t/1000

Но ведь работает, на второй шаг odlgModel.Step = 2 можно повесить и продолжение диалога, "Вы уверены, что хотите распечатать?..." с продолжением отсчета времени

economist

Полезный код. Модальные окна msgbox при суете пользователя (переключение приложений итп) - могут привести к "непониманию" и обратный отсчет на самонарисованных диалогах может пригодиться. 
Руб. за сто, что Питоньяк
Любит водку и коньяк!
Потому что мне, без оных, -
Не понять его никак...

OOKapitan

Огромнейшее спасибо!