（vla get propertyobject）不是

Tharwat · 发表于 2022-7-6 10:52:02

你好

为什么（vla get propertyobject）在Autocad命令行和Visual LISP控制台窗口中都没有响应？

例如

(setq myCircle (vla-addcircle
mspace (vlax-3d-point 
 (getpoint "\nPick the
center point for a circle: ")) 2.0))

在Autocad中直接输入将显示以下错误：

copy

; error: bad argument type: VLA-OBJECT nil

有什么解释吗？

非常感谢

塔瓦特

alanjt · 发表于 2022-7-6 11:29:36

您没有在mspace变量中定义ActiveSpace。此外，要知道，使用VL或entmake创建对象的点必须转换为WCS。

Tharwat · 发表于 2022-7-6 11:44:32

你好Alanjt先生

我已经用很多方法尝试了这个函数，但没有结果。。。。。有什么例子吗？？？

我认为它可能需要（vl load com），所以我先插入了它，但问题是一样的。

顺致敬意，

塔瓦特

alanjt · 发表于 2022-7-6 11:54:56

这是我的ActiveSpace子程序。。。

copy

(defun AT:ActiveSpace (/)
 ;; Defined ActiveSpace
 ;; Alan J. Thompson, 10.12.09
 (if (or (eq acmodelspace
             (vla-get-activespace
               (cond (*AcadDoc*)
                     ((setq *AcadDoc* (vla-get-activedocument (vlax-get-acad-object))))
               )
             )
         )
         (eq :vlax-true (vla-get-mspace *AcadDoc*))
     )
   (vla-get-modelspace *AcadDoc*)
   (vla-get-paperspace *AcadDoc*)
 )
)

[编程交流] （vla get propertyobject）不是

发表回复

精选推荐