用法
评论
建议
取 消
确 定
(defun curve:pline-convexity (ent / i lst v) "多段线凸度列表。" "数值列表" "(curve:pline-convexity (car (entsel)))" (cond ((and (= (quote ename) (type ent)) (= "LINE" (entity:getdxf ent 0))) (list 0)) (t (mapcar (quote cdr) (vl-remove-if-not (quote (lambda (x) (= 42 (car x)))) (entget ent))))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 696 个
函数库类别: 47 种
上传记录
刷新
冀公网安备 13050302000400号