请教VLA-AddRevolvedSolid的应用

Hart

各位大侠,我在学习VLA-AddRevolvedSolid命令时,不理解参数中的AxisDir的意思(旋转轴方向的3D向量),如图我要以0,0,0和0,10,0的线为旋转轴,AxisDir应该是什么数,AxisDir的三元数表都表示什么呢.

Hart

没人知道吗？UP

meflying

这是一个方向，这个方向是用一个矢量表示的，在WCS中，X的方向就是(1 0 0)...根据矢量的算法，(0 0 0)到(0 10 0)的矢量就是后者减去前者，就是(0 10 0)...给你个程序参考一下：

2. (defun c:test( / ent pt1 pt2)
3.    (setq ent (car (entsel)))
4.    (setq pt1 (getpoint "选择点1:"))
5.    (setq pt2 (getpoint "选择点2:"))
6.    (setq dir (mapcar '- pt2 pt1))
7.    (VLA-AddRevolvedSolid (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)))
8.              (vlax-ename->vla-object ent)
9.              (vlax-3d-point pt1)
10.              (vlax-3d-point dir)
11.              (* 2 pi))
12. )

(defun c:test( / ent pt1 pt2)    (setq ent (car (entsel)))    (setq pt1 (getpoint "选择点1:"))    (setq pt2 (getpoint "选择点2:"))    (setq dir (mapcar '- pt2 pt1))    (VLA-AddRevolvedSolid (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)))              (vlax-ename->vla-object ent)              (vlax-3d-point pt1)              (vlax-3d-point dir)              (* 2 pi)) )

Hart

谢谢meflying，献花一朵。 CAD有挺多VLA、VLAX、VL等扩展函数，我手上现在有一本二代龙震的《AutoCAD LISP/VLISP函数库查询辞典》，可里面也只有VLA可查，书中有涉及的一些VLAX等函数都没得查(英文不行，CAD本身的帮助大都是En的），不知大家有没有关于这方面的书籍推荐一下。

meflying

本站就有中文版的帮助文件下载