Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

19 Июнь 2018, 05:33 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Часто задаваемые вопросы по LibreOffice и Apache OpenOffice.org
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: « 1 2 3 4   Вниз
  Печать  
Автор Тема: Таймер на MsgBox  (Прочитано 1734 раз)
0 Пользователей и 1 Гость смотрят эту тему.
dimmon777
Пользователь
**
Offline Offline

Сообщений: 62


« Ответ #45: 21 Март 2018, 23:36 »

rami
Согласен что в коде много лишнего, надергал половину от сюда, половину из Питоньяка. Эта часть так вообще ахинея и отсебятина Шокирован
Код:
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 можно повесить и продолжение диалога, "Вы уверены, что хотите распечатать?..." с продолжением отсчета времени
« Последнее редактирование: 21 Март 2018, 23:38 от dimmon777 » Записан
economist
Ветеран
*****
Offline Offline

Сообщений: 888


« Ответ #46: 22 Март 2018, 00:50 »

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

Руб. за сто, что Питоньяк
Любит водку и коньяк!
Потому что мне, без оных, -
Не понять его никак...
OOKapitan
Старожил
****
Offline Offline

Сообщений: 312


« Ответ #47: 22 Март 2018, 15:33 »

Огромнейшее спасибо!
Записан
Страниц: « 1 2 3 4   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!