1、直接输入mtexted命令,回车,输入notepad,可以将编辑器设置成记事本,如果想设置回来,输入mtexted,回车,输入“.”,回车,就可以回复为CAD默认的编辑器。如果要导入文本,无论是粘贴、插入,实际上都不太复杂,改变编辑器一般人很少用。 2. 导出文本如果仅有少量文字需要导出,那么在单行和多行文字的编辑框中,选择文字进行复制,然后粘贴到文字编辑器中即可。但是如果图纸中有大量散落的文字需要导出,上述方法就不太适用了。下面给大家介绍两个在网上看到的小程序,可以快速将CAD中的单行文字输出为文本文件(*.csv),这个文件用记事本或EXCEL都可以打开。A、选择文字输出可以框选文字进行输
2、出,自动将文字保存为*.csv。(defun c:exx ( / &ss %fir fir tex #si #sn &tex %lay %texcl %ctx ) (vl-load-com) (princ n请选择要输出的文字对象) (if (setq &ss (ssget (list (cons 0TEXT) (progn (setq%fir (strcat C: (vl-filename-base (getvar dwgname) .csvfir (open %fir w) (repeat(setq tex () #si 0 #sn (sslength &ss)(setq &tex
3、 (vlax-ename->vla-object (ssname &ss #si) #si(1+ #si)(setq %lay (vla-get-layer &tex) %tex (vla-get-textstring&tex)(if (setq cl (assoc %lay tex)(setq tex (subst (append cl (list %tex) cl tex)(setq tex (cons (list %lay %tex) tex) )tex (vl-sort tex (function (lambda (a b) (& (length a) (lengthb) (se
4、tq #si0 #sn (length (car tex)lt; (car a) (car#sn(setq %tex (foreach tx tex(if (null (setq %ctx (nth #si tx) (setq %ctx ) )(if (/= %tex (setq %tex (strcat %tex , %ctx)(setq %tex %ctx)(write-line %tex fir) (setq #si (1+ #si) (closefir) (vlax-release-object &tex) (princ(strcat n成功输出 (itoa (sslength &ss
5、) 个文字输出到 %fir 中. (princ n未选择文字对象,退出. (princ)将上面代码复制到记事本中,另存为exx.lsp,在CAD中输入AP命令,加载exx.lsp,加载成功后,在命令行输入EXX,回车,在图中框选要输出的单行文字即可。B、输出同图层文字可以选择图层上的一个单行文字,就可以将此图层上所有单行文字都输出为一个*.csv文件。ecx ( / &tex &ss %fir fir %lay #si #sn ) (if (null vlax-dump-object) (vl-load-com)tex (entsel n请选择要输出图层的文字对象: (if (= (vla-g
6、et-objectnamevla-object (car &tex)AcDbText(progn(setq %fir (strcat ) fir (open %fir tex) &ss (ssget X (list (cons0 ) (cons 8 %lay)(repeat (setq #si 0 #sn (sslength &(write-line (vla-get-textstring (vlax-ename-&vla-object (ssnamess #si) fir)(setq #si (1+ #si)(close fir) (vlax-release-object &(princ (
7、strcat n已输出图层 %lay 中的 (itoa #sn) 个文字到文件 %firn选择的不是文字对象.n未选择对象.将上面代码复制到记事本中,另存为ecx.lsp,在CAD中输入AP命令,加载ecx.lsp,加载成功后,在命令行输入EcX,回车,在图中点取一个要输出图层上的单行文字即可。上面两个程序,不仅AutoCAD可以用,在浩辰CAD这样的国产CAD中也一样可以运行。网上还找到一些其他程序,有的类似,有的不太好用,就不再一一介绍了。希望这两个工具对大家有所帮助,也感谢编写这个程序的人。相关文章:CAD 大字体什么意思?详细讲解CAD字体CAD中的动态文字:字段(field)和动态反应文字(rtext) 什么是CAD大字体?从文字处理的发展讲到CAD的大字体CAD文字显示为问号?怎么解决?更多CAD使用技巧请访问:CAD使用技巧、CAD教程、CAD资料下载
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1