guigol 发表于 2022-7-7 17:38:53

我从今年夏天开始研究这个课题。
 
我有一个转换点到块的路径(在dwg中存在的块allready中选择)
 
但是
 
我的点包含对象数据。当我使用这个路由时,我得到了不能恢复对象数据的块。
在此连接的图片上:
左:routin之前(带有对象数据的点)
右:routin后(无对象数据的块)

 
 
下面是我使用的routin的代码。
您认为是否有可能修改此路由以将对象数据从点传输到块?
 
提前谢谢你。
 
乌伊戈尔
 
(defun c:RPWB(/*error*\u blocks lst block ss space)(vl load com)(defun*error*(msg)(and*AcadDoc*(vla endundomark*AcadDoc*)(if(and msg(not(wcmatch(strcase msg)“*BREAK*,*CANCEL*,*QUIT*”)(princ(strcat“\n错误:“msg)))(defun _blocks(doc/l)(vlax for x(vla get blocks doc)(if(not(wcmatch(vla get name x)”*;*,`**)(if(not(wcmatch(vla get name x);*,`**)setq l(cons(vla get name x)l))(vl sort l'
页: 1 [2]
查看完整版本: 修改点样式或库