Пауза в выполнении

Автор Тема: Пауза в выполнении  (Прочитано 3907 раз)

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

Оффлайн 1958Автор темы

  • ADN OPEN
  • **
  • Сообщений: 91
  • Карма: 0
Пауза в выполнении
« : 07-02-2018, 13:48:23 »
Необходим пауза для закрытия окна acet-ui-status.
Часть кода:
Код - Auto/Visual Lisp [Выбрать]
  1.  (acet-ui-status "Укажите объект" "Объект")
  2.  (setq ent (car (entsel)))
  3.  (setq ent_t (cdr (assoc 0 (entget ent))))
  4.  (if (= ent_t "INSERT")
  5.   (TS_gs-block)
  6.   (TS_gs-line)
  7.  )
  8. (setq ti (getvar "date")
  9. tn (+ ti (/ 3 86400)) ; 3 - три секунды - время задержки
  10. )
  11. (while (< ti tn) (setq ti (getvar "date"))) ; конец while
  12. (acet-ui-status)
Код один раз сработал вроде бы, а потом перестал.
В чем ошибка?
« Последнее редактирование: 07-02-2018, 13:50:56 от Александр Ривилис »

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 13829
  • Карма: 1784
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Пауза в выполнении
« Ответ #1 : 07-02-2018, 13:50:29 »
1958
Напоминаю про правила форматирования кода на форуме - инструкция у меня в подписи. В этот раз я исправлю сам.
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Отмечено как Решение 1958 07-02-2018, 15:26:05

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 13829
  • Карма: 1784
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Пауза в выполнении
« Ответ #2 : 07-02-2018, 14:04:27 »
В чем ошибка?
Думаю, что вот в этом:


Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн Александр Ривилис

  • Administrator
  • *****
  • Сообщений: 13829
  • Карма: 1784
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Пауза в выполнении
« Ответ #3 : 07-02-2018, 14:08:40 »
Еще вариант задержки на три секунды:
Код - Auto/Visual Lisp [Выбрать]
  1. (command "_DELAY" 3000)
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

Оффлайн 1958Автор темы

  • ADN OPEN
  • **
  • Сообщений: 91
  • Карма: 0
Re: Пауза в выполнении
« Ответ #4 : 07-02-2018, 14:29:39 »