vla-get-ActiveSpace 函数

功能

    在图纸空间与模型空间之间切换激活的空间。

语法及参数

(vla-get-ActiveSpace Object)
Object Document
这个属性适用的对象。
ActiveSpace acActiveSpace 列举; 读/写
acModelSpace
acPaperSpace



 




系统变量 
    这个属性的值储存在TILEMODE系统变量中。


说明 
    对于模型空间、浮动视口,这个值设成acPaperSpace。即使可以编辑模型,但仍在 图纸空间中。

    关于这个属性的更我的信息,参见PViewport对象 。


范例

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

  (defun Example_ActiveSpace()
  ;;; 这个范例将 ActiveSpace 属性从
  ;;; 图纸空间切换为模型空间。
  (VL-LOAD-COM)
  (setq AcadObject(vlax-get-acad-object)
  AcadDocument(vla-get-ActiveDocument AcadObject)
  mSpace(vla-get-ModelSpace AcadDocument)
)
  ;;; 显示TILEMODE的当前设定值
  (princ "TILEMODE=")(princ (vla-get-ActiveSpace AcadDocument))(princ "  ActiveSpace范例\n")
  ;;; 将激活的文件改变为图纸空间
  (vla-put-ActiveSpace AcadDocument acpaperspace)
  (princ "TILEMODE=")(princ (vla-get-ActiveSpace AcadDocument))(princ "  ActiveSpace范例\n")
  ;;; 将激活的文件改变为模型空间
  (vla-put-ActiveSpace AcadDocument acModelSpace)
  (princ "TILEMODE=")(princ (vla-get-ActiveSpace AcadDocument))(princ "  ActiveSpace范例\n")
  (princ)
)

    意见?