enixing 发表于 2008-1-4 22:09:00

好郁闷，南方的图用vla-Offset，遇到难题了，各位进来帮帮忙

<p></p><p>很郁闷，在做一个插件的时侯，发现在一张图里面会把原来的线删除掉，查来查去，原来是vla-Offset在这图上有问题。。。</p><p>情况是：vla-Offset后，应该原多段线保留，再偏移出一条新的线，不过唯独在这幅图上面，原线被删除了，只剩下新的线条，经过测试，好像cass出的图都有这个问题。。。郁闷死了，小弟学艺不精，搞不清是什么情况，请各位大虾帮忙看看是什么回事。。。</p><p>(defun C:sa (/ ss fd ang offsetObj plineObj)<br/>&nbsp; (setq ss (ssget ":s" '((0 . "*POLYLINE"))))<br/>&nbsp; (if (car (atoms-family 1 '("vl-load-com")))<br/>&nbsp;&nbsp;&nbsp; (vl-load-com)<br/>&nbsp; )<br/>&nbsp; (setq vlaobj (vlax-ename-&gt;vla-object (ssname ss 0)))<br/>&nbsp; (command "area" "o" (ssname ss 0))<br/>&nbsp; (setq tem (getvar "area"))<br/>;;;;偏移<br/>&nbsp; (vla-Offset vlaobj 1)<br/>)</p>

caoyin 发表于 2008-1-5 10:34:00

我试了，没问题

enixing 发表于 2008-1-5 14:58:00

神奇了，我们办公室里面的几台电脑都试过了，都有这个问题。。。

ljpnb 发表于 2008-1-5 15:31:00

我也试过了，没问题

NetBee 发表于 2008-1-5 18:49:00

<p>先运行一下(setq *error* nil)试试</p>

enixing 发表于 2008-1-6 21:13:00

<p>崩溃了，到底是什么情况。。。我截个图给大家看看</p><p>&nbsp;</p>

mccad 发表于 2008-1-6 21:40:00

这个函数是有这个BUG，解决方法就是在偏移前先复制，偏移后再将原偏移的对象删除，因为原偏移对象会被移到原点附近。另外一个办法就是不要用AX方法来偏移，而直接用command中的偏移。

caogis 发表于 2015-10-1 11:46:53

是不是跟系统变量有关呢？

当前设置: 删除源=否图层=源OFFSETGAPTYPE=0

czcxxx 发表于 2015-10-6 16:38:49

谢谢分享，学习下！！！！！！！！！！！！
页: [1]
查看完整版本: 好郁闷，南方的图用vla-Offset，遇到难题了，各位进来帮帮忙