[Krieger]

Вставить динблок программно и потом отредактировать его свойства можно. Хочется делать это в динамике. Т.е. вставили блок и как-то сразу без участия пользователя хватаем за какую либо определенную его динамическую ручку, чтобы дальше ведя курсор он соответсвенно своим параметрам изменялся. Или отслеживать курсор относительно точки вставки и постоянно перестраивать динблок чтобы пользователь видел результат в реальном времени.
Такое возможно? Кто-нибудь делал?

[Кулик Алексей aka kpblc]

Меняй значение дин.параметра, выполняй регенерацию или обновление примитива, потом аналог

Код:

[Выделить все]

(defun lsp-delay (pse / oldtim newtim tim)
  (setq oldtim (getvar "TDUSRTIMER") ;SET INITIAL TIME
        tim    0
        ) ;SET ELAPSED TIME TO 0
  (while (< tim pse)
    (setq newtim (getvar "TDUSRTIMER") ;GET NEW TIME
          tim    (* (- newtim oldtim) 86400000.0) ;FIND ELAPSED TIME
          ) ;_ end of setq
;    (grtext -2 (itoa (fix (/ tim 1000)))) ;SHOW ELAPSED TIME
    ) ;_ end of while
  (princ)
  ) ;_ end of defun

И по идее этого достаточно.
Источник кода не помню

[Krieger]

И чего этот код делает?

[Кулик Алексей aka kpblc]

Как бы пауза, в миллисекундах. "Примерно ровно" вычисляет

Код:

[Выделить все]

(defun test (/ start end aa)
  (setq aa (getvar "date"))
  (princ (strcat "\nTime : " (rtos (setq start (* 86400.0 (- aa (fix aa)))) 2 14)))
  (lsp-delay 5000)
  (setq aa (getvar "date"))
  (princ (strcat "\nTime : " (rtos (setq end (* 86400. (- aa (fix aa)))) 2 14)))
  (princ (strcat "\nDiff : " (rtos (- end start) 2 4)))
  (princ)
  ) ;_ end of defun

Вернет, к примеру:

Код:

[Выделить все]

_$ (test)

Time : 37473.77602010966
Time : 37478.79099994898
Diff : 5.0150

[Serge_BN]

Сообщение от Krieger ...вставили блок и как-то сразу без участия пользователя хватаем за какую либо определенную его динамическую ручку, чтобы дальше ведя курсор он соответсвенно своим параметрам изменялся...

Правильно.Вот и некоторые заказчики тоже говорят:"Ну нахрена эти инженеры-проектировщики нужны. Только сидят, штаны протирают, бумагу переводят. Да еще деньги плати им. Нет чтоб щелкнул пару раз и проект готов. Че там думать, щелкать надо быстрее."

[Krieger]

Что к чему...

[Serge_BN]

Сообщение от Кулик Алексей aka kpblc Как бы пауза, в миллисекундах. "Примерно ровно"... Time : 37473.77602010966 Time : 37478.79099994898 Diff : 5.0150

Для того,

Сообщение от Krieger ...чтобы пользователь видел результат в реальном времени. Такое возможно? Кто-нибудь делал?

[Krieger]

Сообщение от Кулик Алексей aka kpblc Меняй значение дин.параметра, выполняй регенерацию или обновление примитива, потом аналог

Так, ну вроде получилось что-то. Курсор отслеживаю по grread в функции while. В принципе и без паузы lsp-delay работает, но я так понимаю она нужна для экономии ресурсов.
А что делать с привязками при работе с grread, как их включить?

[Кулик Алексей aka kpblc]

Евгений Елпанов (по-моему, на caduser'e) вроде обрабатывал привязки вместе с grread. К сожалению, точно не помню ни адреса, ни кода

[Krieger]

Kpblc
Можно ли померить DynDraw от Ривилиса и твою _kpblc-block-dyn-change-values? Я попробовал использовать её в callback-функции, но кад вылетает с фатальной ошибкой.

[Кулик Алексей aka kpblc]

вот чего-чего, а причину отследить не могу Надо по идее полный код смотреть, а у меня со временем напряг

[Krieger]

В смысле, ты попробовал и у тебя тоже вылетает?

[Кулик Алексей aka kpblc]

Нет. В смысле: надо смотреть полный код и его тщательно анализировать. А у меня сейчас шансов на это никаких

[Елпанов Евгений]

Сообщение от Кулик Алексей aka kpblc Евгений Елпанов (по-моему, на caduser'e) вроде обрабатывал привязки вместе с grread. К сожалению, точно не помню ни адреса, ни кода

Действительно, я выкладывал такую программу на болоте.

По поводу глюка автокада, при изменении определений блоков с одновременным использованием DynDraw - подтверждаю! Я не смог побороть плавающую ошибку с вылетом автокада в версиях 2007+. В этом году, был вынужден полностью переписать DynDraw на лиспе...

[Krieger]

Так решили проблему?

[Елпанов Евгений]

Сообщение от Krieger Так решили проблему?

Я же сказал, решить с DynDraw не смог!
Пришлось для своего коммерческого проекта, написать новую программу, аналог DynDraw. Т.е. в цикле grread поддержка своих курсоров, привязок, выпадающих меню, клавиатурных сокращений, работы с выпадающими меню и кнопками в тулбарах. Все это без выхода из цикла, с одновременным запуском своих подпрограмм.

ps. Эта программа не может быть опубликована на форуме. Пример использования, можно увидеть на видео роликах, на моем сайте...