CAD设计论坛

 找回密码
 立即注册
论坛新手常用操作帮助系统等待验证的用户请看获取社区币方法的说明新注册会员必读(必修)
查看: 1074|回复: 2

AutoCAD二次开发参考

[复制链接]
发表于 2009-7-30 09:36 | 显示全部楼层 |阅读模式
这是我在展示品企业做的CAD二次开发。
3 q! d# B* w6 }这是我边学边做的,自我感觉有很高的参考价值,大家可以拿去参考9 H) r* g7 A9 E/ s+ B4 F7 u, R5 t
注意:文件必须放至D盘,按提示操作即可安装,不会与其它开发干涉
6 Y7 c* G# t3 H
9 L+ v; B8 e4 f! a% r
: X" v7 d( b4 U% p  R" u& L, b" ]
* j# {3 W* o, j) h, W一、yz_zcad安装
  |; A) v# M+ {  v7 p1.        从我的(Drawing_006)共享资料夹中YZ_ZCAD文件拷贝文件至本机D盘(必须为D盘,汲及MNU文档,LSP文档,DXB文件,DVB文件,图块路径,不推荐修改路径)! |$ U: p8 O2 Z- c) c) s
2.        在CAD中执行MENULOAD命令加载资料夹中的yz_zcad.mnu文件。* s+ s/ }- x7 m' D6 [
3.        此时可以看到文档中的菜单已经在CAD中显示.
, L2 y: a+ Y* |6 r) G9 ^1 ^0 d4.        关闭CAD,将YZ_ZCAD中的acad2007.lsp替换CAD安装目录\Support\ (如: C:\Program Files\AutoCAD 2007\Support)下的acad2007.lsp (其它版本的CAD须打开目录下的acad20xx.lsp,将里面的“ (if (not (=  (substr (ver) 1 11) "Visual LISP")) (load "acad2007doc.lsp")) ”改为“ (if (not (=  (substr (ver) 1 11) "Visual LISP")) (load "acad2007doc.lsp")(load "D:/YZ_ZCAD/LISP/ZCAD.lsp"))” )0 {" \9 l( r) J. R- h

/ t1 c& }6 E0 ]- v4 J7 B在里面有使用方法,还算详细
 楼主| 发表于 2009-7-30 10:58 | 显示全部楼层

文件太大

文件太大了,有17M,只能传VBA文件了

本帖子中包含更多资源

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

x
 楼主| 发表于 2009-7-30 13:31 | 显示全部楼层

运行结果

由于文件不全,图片仅做参考,进入加载后代码可能出现问题,更改图形位置即可。
1 a! J  K% C+ v/ n. ?( f  U6 k( g代码仅做参考,交流

本帖子中包含更多资源

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

x
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关于|免责|隐私|版权|广告|联系|手机版|CAD设计论坛

GMT+8, 2025-5-11 17:59

CAD设计论坛,为工程师增加动力。

© 2005-2025 askcad.com. All rights reserved.

快速回复 返回顶部 返回列表