功能

     设定视口的扭曲角度。

语法及参数

说明

    这个方法会沿着视线扭曲或倾斜视图。AutoCAD依逆时针方法测量扭曲角度，而且0是在右方。 

范例

;;;从二代龙震工作室汉化帮助中提取
;;;本源代码由 xshrimp 2013.2.20 搜集整理,版权归原作者所有！

　　(defun Example_TwistAngle ()
　　;;; 这个范例创建一个新的图纸空间视口。
　　;;;接着显示视口的扭曲角度
　　(VL-LOAD-COM)
　　(setq    AcadObject   (vlax-get-acad-object)
　　AcadDocument (vla-get-ActiveDocument Acadobject)
)
　　;;;定义 pviewport
　　(setq center (vlax-3d-point (list 3 3 0)))
　　(setq width 40)
　　(setq height 40)
　　;;; 从模型空间修改到图纸空间
　　(vla-put-ActiveSpace AcadDocument acPaperSpace)
　　;;; 创建pviewport
　　(setq    pviewportObj
　　(vla-AddPViewport
　　(vla-get-PaperSpace AcadDocument)
　　center
　　width
　　height
)
)
　　(vla-Display pviewportObj :vlax-true)
　　(vla-put-MSpace AcadDocument :vlax-true)
　　(vla-put-ActivePViewport AcadDocument pviewportObj)
　　(vla-Regen AcadDocument acAllViewports)
　　;;;找出视口的扭曲角度
　　(setq twistAngle (vla-get-TwistAngle pviewportObj))
　　(princ "图纸空间视口的扭曲角度是")
　　(princ (vla-get-TwistAngle pviewportObj))
　　(princ "\nTwistAngle 范例")
　　(princ)
)