[LISP程序]：请教类似下面的图形怎样用lisp编命令来计算它的总长度

morecs · 发表于 2003-9-3 12:11:34

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

请教类似下面的图形怎样用lisp编命令来计算它的总长度
有直线，有圆弧，有椭圆

morecs · 发表于 2003-9-3 12:52:14

一个图形里有直线、圆、圆弧、椭圆、椭圆弧等等，怎样编个计算总长度的命令？谢谢！！！

chenhang1203 · 发表于 2003-9-3 13:12:36

用小东工具里的测量曲线长度命令_XDTB_CurveLength可以实现

eachy · 发表于 2003-9-3 14:37:16

编程的话用 list 命令，然后累加 length 系统变量。

lsjjm · 发表于 2003-9-15 10:14:36

(defun c:test ()
  (princ "\nSelect entities: ")
  (setq ss (ssget) n 0 sum 0)
  (while (< n (sslength ss))
(setq obj (vlax-ename->vla-object (ssname ss n)))
(setq len (vlax-curve-getdistatparam obj (vlax-curve-getendparam obj)))
(setq sum (+ sum len))
(setq n (1+ n))
  );
  sum
);

账号		自动登录	找回密码
密码			立即注册

[LISP程序]：请教类似下面的图形怎样用lisp编命令来计算它的总长度

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

[LISP程序]：怎样用lisp来编一个计算图形总长度的命令，另感谢tuger帮我解决昨天的问题

浏览过的版块