当前位置:首页 » 视频软件 » cad怎样大批量修改问号
扩展阅读
手机卡损坏跨区怎样补卡 2025-05-20 08:59:09
怎样在ppt里用橡皮擦 2025-05-20 08:58:53

cad怎样大批量修改问号

发布时间: 2023-03-09 09:13:32

‘壹’ CAD 文件有许多问号。如何一次性更改过来。我这字体齐全

先双击问号的字体,查看是什么字体样式,然后在菜单栏依次单击选择“格式—选择问号字符的字体样式—修改—修改字体为你的程序中有的字体—保存确定”即可

‘贰’ CAD字体出现问号如何一次性解决

操作次序
1、选择是问号的字体,然后按CTRL+1(非小键盘的壹)查看问号对应的文字样式(假设是样式A);
2、点击菜单中的“格式”,选“文字样式”;
3、把“样式A”替换成别的文字样式,多试几次就可以了!

‘叁’ 在CAD中如何应用快速选择修改字体中的问号

安装两个字体【tssdeng.shx,hztxt.shx】,插件就可以快速的修改字体样式,让“?”显示内容。

;单独替换字体样式
(defunC:kk4(/&k1&kw1&n1&)
(setvar"cmdecho"0)
(setvar"blipmode"0)
(if(nullvlax-mp-object)(vl-load-com))
(setqtxts(vla-get-textstyles(vla-get-activedocument(vlax-get-acad-object))))
(princ" 请选择带?的字体")
(if(setq&kw1(ssget'((0."TEXT,MTEXT"))))
(progn
(setq&ss1'()&n10)
(while(setq&k1(ssname&kw10))
(setq&kw1(ssdel&k1&kw1))
(setqtxt(cdr(assoc7(entget&k1))))
(if(=&n10)
(setq&ss1(constxt&ss1))
(if(null(membertxt&ss1))(setq&ss1(constxt&ss1)))
)
(setq&n1(1+&n1))
);while
(setq&n1nil)
(while(setqtxt(car&ss1))
(setq&ss1(cdr&ss1)TxtStyle(vla-Itemtxtstxt))
(if(and(/=(setqfontname(vla-get-fontfiletxtStyle))"")(/=fontname"tssdeng.shx"));1;得到字体名称
(progn;;1
(setq&n1(vla-get-widthTxtStyle));取得宽度因子
(setqcd1(caadr(textbox(list'(0."TEXT")(cons1"文字长度")'(40.200)(cons41&n1)(cons7txt)'(51.0)))));取得文字长度
(vla-put-fontfileTxtStyle"tssdeng.shx");字体修改为tssdeng.shx,这个字体要保证字体库里面有;或者修改为其它字体
(setqcd2(caadr(textbox(list'(0."TEXT")(cons1"文字长度")'(40.200)(cons41&n1)(cons7txt)'(51.0)))));取得修改后的文字长度
(setq&n1(*&n1(/cd1cd2)))
(vla-put-widthTxtStyle&n1);修改宽度因子,保持文字长度不变
);progn;1
);if;1
(if(or(and(/=(setqfontname(vla-get-bigfontfileTxtStyle))"")(/=fontname"hztxt.shx"))(=fontname""));3;得到大字体的名称
(progn;;3
(setq&n1(vla-get-widthTxtStyle));取得宽度因子
(setqcd1(caadr(textbox(list'(0."TEXT")(cons1"文字长度")'(40.200)(cons41&n1)(cons7txt)'(51.0)))));取得文字长度
(vla-put-bigfontfileTxtStyle"hztxt.shx");修改大字体为hztxt.shx,同时要保证CAD字体库里面有这个字体;或者修改为其它字体
(setqcd2(caadr(textbox(list'(0."TEXT")(cons1"文字长度")'(40.200)(cons41&n1)(cons7txt)'(51.0)))));取得修改后的文字长度
(setq&n1(*&n1(/cd1cd2)))
(vla-put-widthTxtStyle&n1);修改宽度因子,保持文字长度不变
);progn;3
);if;3
);while
(if(/=&n1nil)(command"REGEN"));刷新图元
)
)
(princ)
);必须有tssdeng.shx,hztxt.shx两个字体,如果没有会出现错误
;复制到记事本,以【.lsp】为后缀命名,autolisp加载,命令【KK4】,点击保存就可以。
;不在字体样式里面修改,直接选择一个带【?】号的字体,那么这个字体样式就修改了,简单直观。

‘肆’ CAD文字显示问号,如何一次性修改过来

你在打开cad文件时在“指定字体给样式”菜单中点“gbcbig.shx”选项然后点确定,反复此操作直至命令行出现“正在加载DLL”为止。一般设计院都是用的这种(国标)字体。你也可以选择文字之后点格式下拉菜单选“文字式样”在“文字式样”窗口里面改,在这里也可以文字大小(高度)之类的。