jh1005 发表于 2011-4-29 23:59:23

OpenDCL 6.0.2.2 绿色版

本帖最后由 jh1005 于 2012-9-3 23:56 编辑



1.解压到D盘，把ARX目录加入CAD搜索目录，用(Load-ODcl)函数加载OpenDcl的Arx文件。
2.样例目录在\ENU\Samples，里面的例子要用(Load-ODcl)替代(command "_OPENDCL")
;例如：
(defun c:test()
(Load-ODcl);加载arx，替代安装版的(command "_OPENDCL")
(dcl_Project_Load "test.odcl") ;读取ODcl文件，test.odcl放搜索目录或指定路径
(dcl_Form_Show "test_窗体名") ;显示对话框
(princ)
)

(defun Load-ODcl (/ fn)         ;加载OpenDcl*.arx
(or
(member (strcase (strcat "OpenDCL." (substr (getvar "ACADVER") 1 2) ".arx") t) (arx))
(and (setq fn (findfile (strcat "OpenDCL." (substr(getvar "ACADVER") 1 2) ".arx"))) (arxload fn))
(t (alert (strcat "\n路径中无OpenDCL.arx或Runtime.Res.dll文件,加载不成功!")) (exit))
)
(princ)
)


mapple666 发表于 2018-8-8 09:28:28

这真是个好东西。我用了这么长时间。感觉非常好。谢谢

洪少(刀模) 发表于 2018-8-17 14:18:03

不知道怎样用

zark 发表于 2011-4-30 23:47:59

每次加载ODCL都提示：OPENDCL＋版本号。不懂用什么方法阻止提示。YAD就阻止得了哦

jh1005 发表于 2011-5-1 21:32:35

本帖最后由 jh1005 于 2011-5-1 21:34 编辑

回复 zark 的帖子

默认是会有的，加载时提示一次。
YAD那个是经过他处理过的，修改过Runtime.Res.dll文件。
打开Runtime.Res.dll，删除下图那一行就可以了。

去除加载时的版本提示的DLL，替换原文件：

自贡黄明儒 发表于 2011-5-1 21:55:49

这个OpenDCL是拿来做什么用的呀？

jh1005 发表于 2011-5-1 23:13:18

回复 自贡黄明儒 的帖子

http://bbs.mjtd.com/thread-22137-1-3.html

zark 发表于 2011-5-1 23:24:03

回复 jh1005 的帖子

太感动了,因为感动所以感谢.谢谢 谢谢 谢谢 .对了,你上传的那个已经改过了吧.

hnfsf 发表于 2011-5-2 04:15:51

好宝贝，谢谢共享！！

jxcaixiaomeng 发表于 2011-11-11 18:58:07

楼主，我怎么下载不了啊！是不是我等级不够啊，可以发我邮箱吗》jxcaixiaomeng@163.com

jh1005 发表于 2011-11-11 23:34:00

jxcaixiaomeng 发表于 2011-11-11 18:58 static/image/common/back.gif
楼主，我怎么下载不了啊！是不是我等级不够啊，可以发我邮箱吗》

你可以到 http://www.opendcl.com/download/下载最新版，安装版。

myjping 发表于 2012-2-2 15:40:23

有64位的吗，要绿色版的
页: [1] 2
查看完整版本: OpenDCL 6.0.2.2 绿色版