[求助]写line线的扩展数据???
各位高手帮帮忙啊!!我想将两条line线的图元名写进另外一条line线的扩展数据中,该如何做呀??? 没人知道吗???
那lisp函数中有没有能将图元名数据类型转换成其他数据类型的函数啊??? 写进另外一条line线的扩展数据中,
为甚么要这样做<b>??</b> 因为我要在绘图区绘制很多line线,而每条line线都要偏移出三条线,我又需要知道每条根line线偏移出来的线是哪三条,所以就想把三者的图元名写到根line线的扩展数据中。请问版主有办法做到吗??? 需要知道每条根line线偏移出来的线是哪三条??
不难,但知道了又有何用? 现在有4组线:即根line线组,偏移线1组,偏移线2组,偏移线3组。
1组和2组就像管道的平面外管壁,而3组线是管道中线。中线需要连接起来,而1组和2组线则需要相连成为一个通道。我还不想用mline线作。因为根line线相距1组2组线的距离是不固定的。
不难吗?那该如何做到啊!!
这几天我都快把头想炸喽!! 1 vlax-ldata-put<br>
<br>
2 可以用 组<br> 你的扩展数据中最好不要加图元名,应该加图元的索引,因为索引是唯一不变的,而图元名有可能发生变化! 下面为添加扩展数据函数示例:
;;;Add Extend Data<BR>;;;cen :Entity name<BR>;;; ch :Entity's (cen) Handle<BR>(defun XD-Handle (cen ch / un cel ll nel)<BR> (setq cel (entget cen))<BR> (setq ll (list (cons 1002 "}"))<BR> ll (cons (cons 1000 ch) ll)<BR> ll (cons (cons 1002 "{") ll)<BR> ll (list -3 (cons ch ll))<BR> nel (cons ll cel)<BR> )<BR> (regapp ch)<BR> (entmod nel)<BR> )<BR> 太好啦,我想这回问题应该可以解决了!!!
页:
[1]
2