很多次打开图形文件都要选HZTXT，有什么办法不选?
很多次打开图形文件都要选HZTXT，有什么办法不选?
12楼
楼上的方法不错,可用
回复
13楼
怎么用？
回复
14楼
声明：这是我从网上载来的。。。。。。跟大家分享!!
;;电脑内字体少而打开别人的图纸字体特别多怎么办？在文字样式中一个一个
修改，这当然麻烦，送一个小程序给你。这种又没技术含量又很烦的修改让电
脑去做吧。输入ft就可以执行
(defun c:ft()
;(setq orig_cmd (getvar "cmdecho"))
;(setvar "cmdecho" 0)
(setq elist (tblnext "STYLE" T))
(while (/= elist nil)
(setq nm (cdr (assoc 2 elist))
en (cdr (assoc 3 elist))
cn (cdr (assoc 4 elist))
enl (strlen en)
)
(if (and
(/= en nil)
(= cn nil)
(= (findfile en) nil)
(= (strcase (substr en (- enl 2))) "SHX")
)
(command "_style" nm "romans.shx" "0.0" "0.8" "" "" "" "")
); end if
(if (and
(/= cn nil)
(= (findfile cn) nil)
)
(command "_style" nm "romans.shx,hztxt.shx" "0.0" "0.8" "" "" "" "")
) ;end if
(setq elist (tblnext "STYLE"))
);end while
;(setvar "cmdecho" orig_cmd)
)
回复
15楼
第一个附件不好用,还跳出无数对话框,那还用它干什么啊?不如不用,不如设一些默认的字体,第二个有点霸道,都给改了,也不好,最好是把系统里没有的字体个换了还比较合适.
[
本帖最后由 lonnee 于 2008-7-6 07:22 编辑 ]
回复
16楼
把拷贝个HZTXT 在前面加一个下划线“_”变成 _HZTXT.SHX（这样会排在第一个） 这样每次出现这个窗口按紧回车就好了
回复
17楼
把拷贝个HZTXT 在前面加一个下划线“_”变成 _HZTXT.SHX（这样会排在第一个） 这样每次出现这个窗口按紧回车就好了
恩同意这种做法 可是有什么不妥的地方呢？？？
回复
18楼
把拷贝个HZTXT 在前面加一个下划线“_”变成 _HZTXT.SHX（这样会排在第一个） 这样每次出现这个窗口按紧回车就好了
楼上的方法不错,可用
回复
19楼
多谢楼主，希望以后能经常看到这些好东西,楼主辛苦了。
回复
20楼
不知道怎么样，下一个看看，比较一下,感谢楼主，顶一下
回复
21楼
不知道怎么样，下一个看看:victory:
回复
