Schöck
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Лисп для вычисления длины полилинии со скруглениями

Лисп для вычисления длины полилинии со скруглениями

Ответ
Поиск в этой теме
Непрочитано 12.11.2004, 17:19 #1
Лисп для вычисления длины полилинии со скруглениями
CooL
 
Сообщений: n/a

Подскажите как вычислить длину полилинии со скрурлениями и незамкнутую, а то полистал форум и так и не нашел. Точнее нашел, но без скругления.
Просмотров: 2640
 
Непрочитано 12.11.2004, 17:23
#2
Torino


 
Регистрация: 21.08.2003
Штаб
Сообщений: 942
<phrase 1=


Можно посмотреть в свойствах (ctrl+1).
Lenght
Torino вне форума  
 
Непрочитано 12.11.2004, 17:28
#3
CooL


 
Сообщений: n/a


меня интересует как это сделать в лиспе без использования command
 
 
Непрочитано 12.11.2004, 17:50
#4
Torino


 
Регистрация: 21.08.2003
Штаб
Сообщений: 942
<phrase 1=


Код:
[Выделить все]
(defun polylen (/ poly vpoly len)
  (vl-load-com)
  (setq poly (car (entsel "Pick polyline: ")))
  (setq vpoly (vlax-ename->vla-object poly))
  (setq len (vlax-get-property vpoly "length"))
  (princ len)
  (princ)
)
Torino вне форума  
 
Непрочитано 12.11.2004, 18:05
#5
CooL


 
Сообщений: n/a


Большое спасибо.
 
 
Непрочитано 15.11.2004, 13:34 Re: Лисп для вычисления длины полилинии со скруглениями
#6
kos

LISP-программист
 
Регистрация: 25.08.2003
Тутэйшы
Сообщений: 238


Цитата:
Сообщение от CooL
... а то полистал форум и так и не нашел...
А чего форум листать-то? В самом верху, среди закрепленных тем: http://dwg.ru/forum/viewtopic.php?t=953
__________________
Там все есть для счастья - меня там только нет.
Так это значит, что я там - буду!
kos вне форума  
 
Непрочитано 21.02.2007, 13:29
#7
Sergiy

Проектировщик, гидротехник
 
Регистрация: 23.03.2006
Киев
Сообщений: 59


Цитата:
Сообщение от Torino
Код:
[Выделить все]
(defun polylen (/ poly vpoly len)
  (vl-load-com)
  (setq poly (car (entsel "Pick polyline: ")))
  (setq vpoly (vlax-ename->vla-object poly))
  (setq len (vlax-get-property vpoly "length"))
  (princ len)
  (princ)
)
И от меня большое спасибо и сразу вопрос: как повысить точность вычислений - больше 6 значащих цифр
Sergiy вне форума  
 
Непрочитано 21.02.2007, 15:56
#8
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,799
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Код:
[Выделить все]
(defun polylen (/ poly vpoly len) 
  (vl-load-com) 
  (setq poly (car (entsel "Pick polyline: "))) 
  (setq vpoly (vlax-ename->vla-object poly)) 
  (setq len (vlax-get-property vpoly "length")) 
  (princ (rtos len 2 12)) 
  (princ) 
)
VVA вне форума  
 
Непрочитано 21.02.2007, 17:14
#9
Sergiy

Проектировщик, гидротехник
 
Регистрация: 23.03.2006
Киев
Сообщений: 59


Спасибо! То что надо!
Sergiy вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Лисп для вычисления длины полилинии со скруглениями

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск