DCMZ 发表于 2024-11-5 09:25:02

查看某一对象是否有此属性

本帖最后由 DCMZ 于 2024-11-5 10:12 编辑

举个例子，有一段弧线，弧线是没有lengh属性的，我一旦用(vla-get-Length V)便会报错，我无法接收这个错误值。
有没有办法接收这个错误值

黄翔 发表于 2024-11-5 12:29:19

也可以采用这种
(if (vlax-property-available-p obj 'Length)
    (setq len (vla-get-Length obj))
)

liuhe 发表于 2024-11-5 10:15:52

将参数表传递给指定函数并截取错误

(vl-catch-all-apply 'function list)
确定参数是否是 vl-catch-all-apply 返回的错误对象

(vl-catch-all-error-p arg)

从错误对象返回字符串

(vl-catch-all-error-message error-obj)

DCMZ 发表于 2024-11-5 10:59:00

liuhe 发表于 2024-11-5 10:15
将参数表传递给指定函数并截取错误

(vl-catch-all-apply 'function list)


谢谢，马上试下

DCMZ 发表于 2024-11-5 11:55:00

本帖最后由 DCMZ 于 2024-11-5 12:07 编辑

liuhe 发表于 2024-11-5 10:15
将参数表传递给指定函数并截取错误

(vl-catch-all-apply 'function list)
成功了，谢谢

llsheng_73 发表于 2024-11-5 13:40:14

(if(VL-CATCH-ALL-ERROR-P(setq l(VL-CATCH-ALL-APPLY(function vlax-get-property)(list(vlax-ename->vla-object(car(entsel)))'length))))(VL-CATCH-ALL-ERROR-MESSAGE l)l)

DCMZ 发表于 2024-11-5 14:03:36

黄翔 发表于 2024-11-5 12:29
也可以采用这种

谢谢，学习了

DCMZ 发表于 2024-11-5 14:04:37

llsheng_73 发表于 2024-11-5 13:40


谢谢，学习了

你有种再说一遍 发表于 2024-11-6 16:44:35

# 装饰器模式
以前我总是想,为什么存在这样奇怪的模式,都写在同一个类上面写完就好了呀.
后来遇到了序列化,发现数据类要纯粹,不能耦合多种方法,不然肉眼比较字段存在困难,以至于出现能省则省的写法.
那么方法提供在哪里呢?这要说到,曲线为什么没有Length属性?
很多人都这样想过,如果有就方便多了,为什么桌子就是不这样提供呢?
想必很多人都是直接写扩展方法来处理不同的图元...这样做虽然没错,只是设计模式用起来就知道爽了.
其实桌子是暴露最底层,上层的话会用一个装饰类提供方法,在装饰类上面通过if/switch/map来处理不同图元,然后暴露一个Length属性.
这样它们就能ent.Length了!!!
这样封装的好处是什么?把底层暴露,把好用的东西藏起来!!!

补充在此文章下面
http://bbs.mjtd.com/thread-191057-1-1.html

muai2010 发表于 2024-11-8 12:49:04

不错支持下的
页: [1]
查看完整版本: 查看某一对象是否有此属性