根据CAD版本自动加载插件

myfrankie · 发表于 2014-2-9 13:04:09

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

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

×

;;;

(setq acadver (atof (getvar "acadver")))
  (cond
((and (>= acadver 16.0) (<= acadver 16.2))                            ;;判断CAD版本是否为 2004~06

   (arxload (findfile "sys16/即指即显Periscope-R16.arx"))                ;;即指即显 for CAD04~06
   (NETLOAD (findfile "sys16/剪贴板【Clipboard】-16.dll"))                ;;剪贴板 for CAD04~06

)

((and (>= acadver 17.0) (<= acadver 17.2))                            ;;判断CAD版本是否为 2007~09

   (arxload (findfile "sys17/即指即显Periscope-R17.arx"))                ;;即指即显 for CAD07~09
   (NETLOAD (findfile "sys16/剪贴板【Clipboard】-17.dll"))                ;;剪贴板 for CAD07~09

)

(princ)
06 显示函数已取消 08 显示错误: 参数类型错误: stringp nil
为什么我这个判断不对。不能加载求修改

st788796 · 发表于 2014-2-9 13:09:40

没有netload函数吧
arx加载建议写入acad.rx

gzgbzh · 发表于 2014-2-9 14:00:30

这个好，正需要这个功能

myfrankie · 发表于 2014-2-9 16:04:14

st788796 发表于 2014-2-9 13:09
没有netload函数吧
arx加载建议写入acad.rx

能否具体说说

wskiqght · 发表于 2019-3-8 21:09:46

不懂怎么弄，能讲解一下不

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

[求助] 根据CAD版本自动加载插件

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

点评