明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2466|回复: 4

[讨论] CAD二次开发安装制作问题

[复制链接]
发表于 2011-3-22 12:55:08 | 显示全部楼层 |阅读模式
CAD二次开发安装制作问题:
按秋枫大侠指导步骤做成STEUP.EXE之后,添加CAD支持搜索路径,加载菜单都没问题,就是下面一段初始化之后,用load加载LISP只能加载一部分,大概只能加载到红色部分的,后面的不行,我注释掉前面的,又能加载后面的,不过也是一部分,因为搜集lisp比较多,是不是这个有个数限制,还是有其他原因,求助。


(initxyzApplication)
  ;; 加载主程序
  ;; 为节省内存,这里也可以以autoload函数形式定义
  ;; 有几条写几条
   (LOAD "YH_dimxy.LSP");   
   (LOAD "AutoNum.LSP");
   (LOAD "AMEND_BLOCK.LSP");
   (LOAD "EXP17.LSP");
   (LOAD "TextSDodge.lsp");
   (LOAD "RB.LSP");
   (LOAD "EF_Text.lsp");
   (LOAD "BatchPlot.lsp");
   (LOAD "cstyles.lsp")
   (LOAD "inputBox.lsp");文字样式批量修改
   (LOAD "ZZFIND_new.LSP");
   (LOAD "EF_Lib.VLX")
   (LOAD "EF_AutoIME.VLX");
   (LOAD "sz2.lsp");
   (LOAD "CAD图层操作.LSP");
   (LOAD "ExchangeText.LSP");
   (LOAD "lj.VLX");
   (LOAD "MTEXT加强.LSP");
   (LOAD "RubbishCleaner.LSP");
   (LOAD "安装图工具.LSP");
   (LOAD "按绘图系数统计线段长度.lsp");
   (LOAD "移动到对象中心.LSP");
   (LOAD "一键开关特性窗口.LSP");
   (LOAD "加载宏命令.LSP");

   (LOAD "可以框选的修剪需要修正.lsp");
   (LOAD "画五角星程序.LSP");


见附件,加载LISP程序

本帖子中包含更多资源

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

x
发表于 2011-3-22 13:19:20 | 显示全部楼层
回复 xyz2009xyz 的帖子

如果前面的lisp程序有错,或者单独运行没问题,单前后程序相互干扰,导致后面程序出错,出错之后的程序都不会加载!你最好将所有lisp程序打包成vlx文件,调试成功后再加载!就一句话即可了!(load "我的程序.vlx" "我的程序加载不成功!")
发表于 2011-3-22 14:42:26 | 显示全部楼层
原来如此啊
 楼主| 发表于 2011-3-23 18:48:25 | 显示全部楼层
本帖最后由 xyz2009xyz 于 2011-3-23 18:50 编辑

呵呵,再问一下,如果想做成按需加载应该怎么弄呢?
别人的答复:在工作中,为了减少内存开支,最好是按需加载,使用autoload函数是很好的办法

可以加载fas及vlx文件解决方法
答:两者可选一种:
  1.修改acad2000doc.lsp中的函数ai_ffile内容,增加查找fas及vlx文件的语句:
  (defun ai_ffile (app)
    (or (findfile (strcat app ".lsp"))
        (findfile (strcat app ".exp"))
        (findfile (strcat app ".exe"))
        (findfile (strcat app ".arx"))
        (findfile (strcat app ".fas"))
        (findfile (strcat app ".vlx"))
        (findfile app)
    )
  )

  或者:
  2.直接在autoload中的文件中写上扩展名,如:
    (autoload "文件名.vlx" '("执行命令"))


这个函数是写在acad2000doc.lsp中吗?或者写在其他位置也可以!
发表于 2013-1-5 23:26:34 | 显示全部楼层
学习了
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-6-2 11:02 , Processed in 0.194321 second(s), 33 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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