为什么提取不了insertionpoint属性

han.neng · 发表于 2016-4-30 08:53:48

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

代码如下：
(vl-load-com)
  (setq AcadObject (vlax-get-acad-object)
AcadDocument (vla-get-activedocument AcadObject)
)
  (setq blks (vla-get-blocks AcadDocument))
  (vlax-for itm blks
(setq blkname (vla-get-name itm))
(if (wcmatch blkname "A0L,A0L1,A0L2,A1L,A1L1,A1L2,A1L4,A1L5,A2L,A2L1,A2L2,A3L");;筛选图框块
   (progn
(setq ipnt (vlax-safearray->list (vlax-variant-value (vla-get-insertionpoint itm))))
....
....
);end_progn
   );end_if
);end_vlax_for
  (princ)
  )
问题就出在这里： (setq ipnt (vlax-safearray->list (vlax-variant-value (vla-get-insertionpoint itm))))
提取不了Insertionpoint。请各位前辈支招！！！

csharp · 发表于 2016-4-30 09:17:59

本帖最后由 csharp 于 2016-4-30 09:19 编辑

blocks是块表，vlax-for的元素blk是blockdef，即BlockTableRecord，不是块引用，insertionpoint是blockreference的属性

hanneng0328 · 发表于 2016-4-30 09:31:01

那如何将blocktablerecord转换为blockreference呢

csharp · 发表于 2016-4-30 09:32:54

blockreference属于模型空间，用ssget获取后遍历选集

hanneng0328 · 发表于 2016-4-30 09:43:29

谢谢指教！

账号		自动登录	找回密码
密码			立即注册

[求助] 为什么提取不了insertionpoint属性

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

浏览过的版块