在打开图纸时自动替换未找到字体为指定字体的函数

chg

做了一个ACADDOC.LSP文件，你将此文件放置到你CAD安装目录下的SUPPORT目录下面即可，如果你该目录下存在了这个文件，请不要替换，你可以将我文件里的内容附加进去，这需要懂得一些LISP知识。另说明，此程序并不能完美运行，能力有限，使用不顺处，海涵。

lingduwx

chg 发表于 2011-12-24 13:17
做了一个ACADDOC.LSP文件，你将此文件放置到你CAD安装目录下的SUPPORT目录下面即可，如果你该目录下存在了这 ...

谢谢
非常感谢楼主的热心帮助

lingduwx

哎
看来还是要学些LSP基本知识才行哦
偶的win 7 和CAD 2006
偶把文件拷贝到CAD安装目录下的SUPPORT里面（原里面没有ACADDOC.LSP）
运行CAD还是解决不了
偶的CAD文件里有acad2006doc.lsp貌似跟ACADDOC.LSP长的最像，
偶想把文件添加进去，可是还是搞不懂，还想麻烦楼主教教俺
先谢了

chg

这个跟ACAD2006DOC.LSP没有关系的，你的解决不了是什么意思？如果是字体替换不了，把你的图发上来，我测试一下。

lingduwx

chg 发表于 2011-12-25 18:18
这个跟ACAD2006DOC.LSP没有关系的，你的解决不了是什么意思？如果是字体替换不了，把你的图发上来，我测试一 ...

我临时找了张图，打开提示找不到字体

chg

看了你的图，在我机子上运行正常，所有字体更改正确。在我的第一个帖子了曾经说过要自行下载DOL_LIB库安装，估计你没有安装和加载，所以程序出错了，我现在更改了新文件，并将库也上传，因为很久没用2006了， 所以不确定它的版本号是多少，现提供2个库，你将这个包里的所有文件都拷贝到SUPPORT目录下，ADADDOC.LSP也用这个包里的，如果还不能正常运行，请你在cad命令行输入 (getvar "acadver")回车，然后将后面的字符串给我。如果正常运行就没事了。还有打开的时候说找不到字体，不用理会，直接全部点击忽略就行。高版本的CAD只会提示1次，低版本的估计会每次都提示，这个我无法更改。

lingduwx

现在搞定了，非常感谢楼主的帮助。

ORCHI

chg 发表于 2011-12-26 18:42
看了你的图，在我机子上运行正常，所有字体更改正确。在我的第一个帖子了曾经说过要自行下载DOL_LIB库安装， ...

我目前的cad2010版本好像不行，我输入(getvar "acadver")得到的提示是："18.0s (LMS Tech)"，能帮忙看下吗？目前还是会弹出字符替换的对话框。

chg

没用过2010，估计也是用DOS_LIB18.ARX，现在将库添加进压缩包，并更改了ACADDOC.LSP文件，支持2010及2011，你下载后试试。

puzb2001

先收藏，有时间慢慢学习