用Net这样扩展的Lisp函数你是否喜欢

eachy · 发表于 2015-1-13 11:31:11

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

一个函数完成下面内容

1 获取属性

命令: (minvoke (entlast) "get_startpoint")
(1336.67 1140.12 0.0)

命令: (minvoke (entlast) "get_length")
562.999

命令:
命令: (minvoke (entlast) "get_ecs")
((1.0 0.0 0.0 0.0) (0.0 1.0 0.0 0.0) (0.0 0.0 1.0 0.0) (0.0 0.0 0.0 1.0))

命令: (minvoke (entlast) "get_bounds")
((1336.67 1140.12 0.0) (1336.67 1140.12 0.0))

2 查询支持的方法

命令: (minvoke (entlast))

get_StartPoint() , ReturnParameter is Point3d
set_StartPoint(Point3d) , ReturnParameter is Void
get_EndPoint() , ReturnParameter is Point3d
set_EndPoint(Point3d) , ReturnParameter is Void
get_Thickness() , ReturnParameter is Double
set_Thickness(Double) , ReturnParameter is Void
get_Normal() , ReturnParameter is Vector3d
set_Normal(Vector3d) , ReturnParameter is Void

。。。。。。

3 设置

(minvoke (entlast) "set_startpoint" (getpoint))

(minvoke (entlast) "GetSplitCurves" 0.1 0.2 0.3 0.4)

/db_自贡黄明儒_ · 发表于 2015-1-13 12:06:16

喜是喜欢，桌子这么改来改去，如何跟上它的步伐？{:soso_e109:}

csharp · 发表于 2015-1-13 12:11:11

/db_自贡黄明儒_ 发表于 2015-1-13 12:06
喜是喜欢，桌子这么改来改去，如何跟上它的步伐？

Net虽然比不过ARX，但适应能力强，Invoke是系统提供的方法，Autodesk提供啥就有啥

kkt123 · 发表于 2015-2-26 12:06:07

喜是喜欢，桌子这么改来改去
:loveliness:

账号		自动登录	找回密码
密码			立即注册

[原创] 用Net这样扩展的Lisp函数你是否喜欢

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评