自动加载计算器函数CAL（GeomCAL）

marting · 发表于 2018-4-9 11:21:03

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

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

×

本帖最后由 marting 于 2018-4-9 11:30 编辑

论坛介绍过，ADESK自己写的一个函数 CAL功能很强，可是不是随着系统启动就有的，就需要根据ACAD的版本手工加载geomcal.arx，或者geomcal.crx
加载前：
命令: (CAL "ill(p1,p2,p3,p4)" ))
错误: no function definition: CAL

加载后：
命令: (CAL "ill(p1,p2,p3,p4)")
(26234.2 -13240.7 0.0)

下面代码自动加载他们

(if (or (findfile "geomcal.arx") (findfile "geomcal.crx"))
(progn
(arxload "geomcal")
)
)

使用通用LISP函数库函数XD::AutoStartp

（XD::AutoStartup）设置一个应用程序自动随ACAD启动

(xd::autostartp "geomcal.arx" t) 或
(xd::autostartp "geomcal.crx" t)

就添加到启动组里面了。

sicky111 · 发表于 2018-4-9 11:54:12

沙发，谢谢分享。

sh_h · 发表于 2018-4-9 13:57:28

谢谢大师分享！！！

kqqt6236 · 发表于 2018-4-10 00:13:58

谢谢分享。

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

[每日一码] 自动加载计算器函数CAL（GeomCAL）

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

评分