啵浪鼓 发表于 2011-4-24 01:01:35

offset返回值能得到吗?

在写一个偏移后将偏移后对象改变图层的命令,遇到某些部分不能往内偏移的如偏移值大于外形时，或者聚合线内部有小点时，程序提示“无法偏移该对象。”，
因为后续写了很多(entlast)最后的对象的命令，会导致此对象未成功偏移会把上一次的对象的图层改变，不想写(exit)来强退，请问如何得到该对象是否偏移成功返回值。

(command "offset" d01a si wznew "")
(command "_.chprop" (entlast) "" "la" "1" "c" "2" "")
...
(command "offset" d01a si wznew "")
(command "_.chprop" (entlast) "" "la" "2" "c" "3" "")
...

Gu_xl 发表于 2011-4-24 08:10:31

回复 啵浪鼓 的帖子

offset之前储存一个(entlast)图元，offset之后的(entlast)与之前的(entlast)比较是否相同判断offset是否成功！
还有就是使用VL-CATCH-ALL-APPLY和vla-offset函数组合，用VL-CATCH-ALL-ERROR-P判断！

mandala 发表于 2011-4-24 09:31:27

第一种方法比较直观。

啵浪鼓 发表于 2011-4-24 13:02:47

谢谢楼上2位大大，我想我知道怎么做了，同楼上大大一样的想法，做比较比较容易，vlisp没怎么接触过!

啵浪鼓 发表于 2011-4-25 19:57:14

经过一天的摸索，通过图层来判断是不可行，通过(10)的组码好像也不行，偏移成功与不成功，(entlast)取出来没法分辨，纠结中。。。

xyp1964 发表于 2011-4-25 20:19:22

(setq s1 (entlast))
(command "offset" d01a si wznew "")
(setq s2 (entlast))
(if (not (equal s1 s2))
(command "_.chprop" s2 "" "la" "1" "c" "2" "")
)
页: [1]
查看完整版本: offset返回值能得到吗?