yanchao316 发表于 2021-3-1 18:02:51

这个很好用,但是发现个矛盾的地方,对于有些打开很慢的图,如果选择“忽略缺少的shx文件并继续”图就要等非常久,甚至打不开,即使打开了,中途操作,比如re也会卡很久。这个是CAD自身问题,但是这么忽略字体就会卡。

print1985 发表于 2021-3-1 18:43:30

afrgrgfdgdgt111 发表于 2021-3-1 17:17
大佬可以上传个lsp文件吗,我复制的代码加载错误

论坛代码高亮有问题
你把第一句:
和最后一句:
删掉就可以了

afrgrgfdgdgt111 发表于 2021-3-2 08:57:48

本帖最后由 afrgrgfdgdgt111 于 2021-3-2 09:04 编辑

print1985 发表于 2021-3-1 18:43
论坛代码高亮有问题
你把第一句:
删掉就可以了
好了谢谢大佬

my258 发表于 2021-3-2 09:28:12



学习学习了,谢谢分享

afrgrgfdgdgt111 发表于 2021-3-2 10:10:32

print1985 发表于 2021-3-1 18:43
论坛代码高亮有问题
你把第一句:
删掉就可以了

请问大佬有不修改文字样式的小插件吗

print1985 发表于 2021-3-2 11:11:47

afrgrgfdgdgt111 发表于 2021-3-2 10:10
请问大佬有不修改文字样式的小插件吗
试试这个 自己根据需要修改
Tssdeng.shx,Tssdchn.shx为英文、中文字体,0.8为宽高比

如果不是你想要的 论坛搜搜一下很多源码


;修改文字字体(文字样式)gzt
(defun c:gzt (/ e txtst)
(if (setq e (car (nentsel "\n选择需要修改字体的文字(CAD单行文字)")))
    (if (setq txtst (cdr (assoc 7 (entget e))))
      (progn
      (command "style" txtst "Tssdeng.shx,Tssdchn.shx" "" "0.8" "" "n" "n" "n") ;Tssdeng.shx,Tssdchn.shx为英文、中文字体,0.8为宽高比
      (command "regen") ;重新生成图纸,防止修改后未刷新文字
      (princ "\n文字样式已修改")
      )
      (princ "\n不是CAD单行文字,请重新选择")
    )
)
(princ)
)

czb203 发表于 2021-3-2 11:41:20


大佬可以上传个lsp文件吗,我复制的代码加载错误

print1985 发表于 2021-3-2 11:49:58

czb203 发表于 2021-3-2 11:41
大佬可以上传个lsp文件吗,我复制的代码加载错误

明经上传不了附件
如果复制的代码如果有问题 请到晓得下载lsp
http://bbs.xdcad.net/thread-727707-1-1.html

afrgrgfdgdgt111 发表于 2021-3-2 15:20:23

print1985 发表于 2021-3-2 11:11
试试这个 自己根据需要修改
Tssdeng.shx,Tssdchn.shx为英文、中文字体,0.8为宽高比



感谢大佬,我回头也得学习下制作lisp程序了

print1985 发表于 2021-3-2 16:06:48

yanchao316 发表于 2021-3-1 18:02
这个很好用,但是发现个矛盾的地方,对于有些打开很慢的图,如果选择“忽略缺少的shx文件并继续”图就要等 ...

试试才发的C#版
页: 1 [2] 3 4 5 6 7 8
查看完整版本: 干掉选择字体对话框,开图自动替换字体(2021.3.2增加c#版本)