明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2050|回复: 5

进入AUTOCAD时执行我的LISP程序,该如何作?

[复制链接]
发表于 2004-12-16 11:44:00 | 显示全部楼层 |阅读模式
我想在每次AutoCAD启动时执行我的LISP程序,该如何作啊? 我的LISP程序如下:(defun startup()
(if (findfile "test0.dwg")
(progn
(command "shell" (strcat "del " "?est*.dwg"))
(graphscr)
) )
) 我想每次进入时都删除test*.dwg文件,启动时该如何执行这段程序呢?
发表于 2004-12-16 12:17:00 | 显示全部楼层
在CAD中输入APPLOAD,在启动组中把你的程序加入就可以了。
发表于 2004-12-16 20:30:00 | 显示全部楼层
(defun startup()
(if (findfile "test0.dwg")
(progn
(command "shell" (strcat "del " "?est*.dwg"))
(graphscr)
) )
)
(startup)
;把这个文件放到启动组里。
 楼主| 发表于 2004-12-16 20:34:00 | 显示全部楼层
那样只能加载,但是我想进入时就执行该程序,不知有啥办法啊?


谢谢帮忙!!!
发表于 2004-12-17 07:48:00 | 显示全部楼层
用如下方法定义函数



(defun S::startup()


.....


)


把函数加入acad2004doc.lsp文件的后面,启动CAD就行了,


如果你的CAD不是2004版,只要加入相应的LSP文件就行。
发表于 2004-12-17 08:40:00 | 显示全部楼层
附件中有个lisp文件,下载后放到启动组里。我试了,能行。


(defun startup()


        (alert"运行了startup程序")         


)


(startup)


启动CAD时能自动显示对话框。

本帖子中包含更多资源

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

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

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-9-30 02:17 , Processed in 0.162822 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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