用法
评论
建议
取 消
确 定
(defun curve:subsegment-picked-type (curve p / pp) "多段线子段图元类型" (if (listp p) (progn (setq pp (vlax-curve-getclosestpointto curve (trans p 1 0))) (setq pp (vlax-curve-getsecondderiv curve (fix (vlax-curve-getparamatpoint curve pp))))) (setq pp (vlax-curve-getsecondderiv curve p))) (if (equal pp (quote (0.0 0.0 0.0))) "line" "arc"))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新