如何根据vba的objectid转换成lisp对象？vba与lisp协同工作问题

star_sur · 发表于 2011-3-24 22:37:33

本帖最后由 star_sur 于 2011-3-24 23:12 编辑

如何根据vba的objectid转换成lisp对象？？？
现在情况是appload  cc.lsp 以后，运行命令 cc，提示选择闭合的多义线，以这条闭合的多义线为边进行剪切，
我现在想用vba 自动指定对哪条闭合的多义线进行剪切，而不是手工选。想法就是用vba取得闭合的多义线的objectid，
存在变量Users1中，然后ThisDrawing.Application.ActiveDocument.SendCommand  “CC 自动读取Users1，
得到闭合的多义线，不再需要提示人工选择。

VBA里
有一条闭合的pl，objectid为“FFFFHGD”
SetVariable "Users1" , “FFFFHGD”
ThisDrawing.Application.ActiveDocument.SendCommand  “CC ”

Lisp里面
我想通过 (setq a (GetVar "Users1"))  ，直接让lisp直接去处理objectid 是"Users1" 的闭合pline线
请高手帮我看看lisp文件应该怎么改一下？

以下是 cc.lsp 文件完整源码，怎么修改一下，望赐教。我的求求

chmenf087 · 发表于 2011-3-25 20:59:25

不要用objectID 用实体的句柄handle,在lisp中用(handent handle)就可以转化成lisp可用的对象

chmenf087 · 发表于 2011-3-25 21:00:48

回复 star_sur 的帖子

不要用objectID 用实体的句柄handle,在lisp中用(handent handle)就可以转化成lisp可用的对象

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

如何根据vba的objectid转换成lisp对象？vba与lisp协同工作问题

本帖子中包含更多资源