浅沧 发表于 2022-8-15 16:05:05

调用tzt命令的时候出现如下错误提示，将代码复制保存成lsp文件后加载的。

664571221 发表于 2022-8-26 14:40:02

lsp文件要方在哪里，是不是每次开cad先加载lsp

奥特蛋 发表于 2022-9-22 10:40:13

请问有没得支持CAD2008的

jake2017 发表于 2022-10-29 22:26:38

谢谢大神分享！

xiongkun 发表于 2022-11-29 11:41:00

感谢分享，学习一下

ZYX2129 发表于 2022-12-3 20:03:32

太牛了，高人

嘉伟钢结构 发表于 2022-12-20 15:52:21

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

Klein 发表于 2023-1-16 10:10:03

学习了，谢谢楼主，之前一直不知道怎么判断缺失的字体
(vla-getfont x 'a 'b 'c 'd 'e)
a就是字体样式X的字体名称

Klein 发表于 2023-1-16 10:12:53

浅沧 发表于 2022-8-15 16:05
调用tzt命令的时候出现如下错误提示，将代码复制保存成lsp文件后加载的。

代码中自定义了出错处理函数*error*,错误处理函数中不允许使用command命令，改一下就好了
(defun *error* (msg);错误处理
    (setvar "regenmode" 1)
    (command-s "undo" "e")
    (setvar "cmdecho" 1)
    (princ msg)
)

Klein 发表于 2023-1-16 10:14:46

楼主自定义了*error*函数，建议先取得原先的错误函数定义，用完了替换回去，否则可能导致其他程序出问题。
页: 1 2 3 4 [5] 6 7
查看完整版本: 干掉选择字体对话框，开图自动替换字体（2021.3.2增加c#版本）