[求助]：有没有办法批处理字体样式替换呢

cooldream · 发表于 2003-12-1 14:15:21

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

有没有办法批处理字体样式替换呢？
例如：
原来字体样式是SIMPLE，现在我想把他替换成STANDAND样式，有没有办法可以一下字替换呢？

ZXK68 · 发表于 2003-12-1 15:10:20

这个用Autocad2004太简单了，选择所有对象，然后点击样式工具面板上的文字样式standard即可完成全部替换。

lsjjm · 发表于 2003-12-1 15:19:44

试试这个程序:

(defun c:test ()
  (vl-load-com)
  (setq ss (ssget '((0 . "TEXT"))))
  (setq n 0)
  (while (< n (sslength ss))
(setq obj (vlax-ename->vla-object (ssname ss n)))
(vla-put-stylename obj "standard")
(setq n (1+ n))
)
  )

cooldream · 发表于 2003-12-1 15:31:19

不好意思，我还想问一下，我加载了你上面的程序后，再打什么命令用呢？

lsjjm · 发表于 2003-12-1 15:40:52

键入 test 即可.

cooldream · 发表于 2003-12-1 16:47:08

加载后和加载前打TEXT都一样的哦~

lsjjm · 发表于 2003-12-2 04:56:40

最初由 cooldream 发布
[B]加载后和加载前打TEXT都一样的哦~ [/B]

注意: 不是TEXT, 是TEST!

cooldream · 发表于 2003-12-2 09:18:26

我试过了，单行文本可以，但多行文本就不可以了~

lsjjm · 发表于 2003-12-2 09:55:47

将(setq ss (ssget '((0 . "TEXT")))) 改成 (setq ss (ssget '((0 . "*TEXT")))) 不就行了?

lywxf · 发表于 2003-12-3 08:34:46

用chtext试试，这个命令很好用的。不过好像2000还是14的express才有，我是把它保存下来了。

cooldream · 发表于 2003-12-4 10:00:12

To lsjjm
我试过了，还是不行，我加载后修改多文本字体，他都变成了一堆？？？？号了？

prestress · 发表于 2003-12-4 18:59:54

test是什么命令？请详解！

lh8888 · 发表于 2003-12-4 19:19:02

上述程序存为什麽格式的文件？又是在cad的什麽菜单调入。

sift · 发表于 2003-12-4 19:24:07

用FI搜索字体样式原名的，应用后把选择到的改一下特性不就行了

sfnok · 发表于 2003-12-4 20:00:29

工具选项修改里面可以改的

账号		自动登录	找回密码
密码			立即注册

[求助]：有没有办法批处理字体样式替换呢

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子