Длина линии полем

Автор Тема: Длина линии полем  (Прочитано 4301 раз)

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

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

  • ADN OPEN
  • **
  • Сообщений: 91
  • Карма: 0
Длина линии полем
« : 21-01-2023, 18:06:35 »
Код - Auto/Visual Lisp [Выбрать]
  1. (setq pline (vlax-ename->vla-object (car (setq ent (entsel "\nУкажите линию >> \n")))))
  2. (setq dx (getreal "\nВведите домер >> \n")
  3.       mk (getstring t "\nВведите марку кабеля >> \n")
  4. )
  5. (setq txt (strcat mk
  6.                   "\nL = "
  7.                   "%<\\AcObjProp Object(%<\\_ObjId "
  8.                   (itoa (vla-get-objectid pline))
  9.                   ">%).Length \\f \""
  10.                  "%lu2%pr2%"
  11.                  "\">%"
  12.                   " м"
  13.           )
  14. )
Как прибавить число dx к указываемой в поле длине линии?
Это вообще возможно?
« Последнее редактирование: 21-01-2023, 19:49:32 от Александр Ривилис »

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

  • Administrator
  • *****
  • Сообщений: 13829
  • Карма: 1784
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Длина линии полем
« Ответ #1 : 21-01-2023, 19:50:17 »
1958,
Не забываем про форматирование кода!
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

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

  • Administrator
  • *****
  • Сообщений: 13829
  • Карма: 1784
  • Рыцарь ObjectARX
  • Skype: rivilis
Re: Длина линии полем
« Ответ #2 : 21-01-2023, 19:52:00 »
Это возможно через выражения (AcExpr) в полях. Но я не уверен, что это будет надежно работать.
Примеры:
https://adn-cis.org/forum/index.php?topic=9854.0
https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/field-formulas/m-p/3149932#M299003
Не забывайте про правильное Форматирование кода на форуме
Создание и добавление Autodesk Screencast видео в сообщение на форуме
Если Вы задали вопрос и на форуме появился правильный ответ, то не забудьте про кнопку Решение

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

  • ADN OPEN
  • **
  • Сообщений: 91
  • Карма: 0
Re: Длина линии полем
« Ответ #3 : 22-01-2023, 07:11:46 »
Спасибо за ответ. Я долго вчера мудрил с формулой, запутался.
Мне помогли на https://forum.dwg.ru/showthread.php?t=167416