tailake 发表于 2004-8-9 15:26:00

[求助]请教CAD高手?

由于工作原因,我需要编辑日本传来的图纸,由于字体的不同,每次总要在字体样式中修改,非常麻烦,是不是只要有日文字体就可以了,如果谁有提供给我一些.

gzy 发表于 2004-8-9 21:38:00

最好找作者要.

woleikk 发表于 2004-8-9 21:42:00

这个要求很荒唐，

老菲 发表于 2004-8-10 00:20:00

要内码支持.

f5612140 发表于 2004-8-10 10:29:00

tailake发表于2004-8-9 15:26:00static/image/common/back.gif回复：（tailake）请教CAD高手? 由于工作原因,我需要编辑日本传来的图纸,由于字体的不同,每次总要在字体样式中修改,非常麻烦

可透过编程,一个指令搞定

cl12232000 发表于 2004-8-10 11:52:00

侠之大者 :


请问怎么编程呀,       你怎么不说清楚?!

f5612140 发表于 2004-8-10 16:15:00

请参考(defun c:ccc()   (setvar "cmdecho" 0)
   (setq twidth (getreal (strcat "\nSetup Text Width:<0.8>?")))
   (if (= twidth nil)(setq twidth 0.8))
   (setq aa (tblnext "style" t))
   (while aa
         (setq textpe (cdr (assoc 2 (cdr aa))))
         (setq engtpe (cdr (assoc 3 (cdr aa))))
         (setq chitpe (cdr (assoc 4 (cdr aa))))
         (if (= chitpe "")
                   (setq stp engtpe)
                   (setq stp (strcat engtpe "," "chineset.shx"))
         )
         (command "style" textpe stp "" "" "" "" "" "")
         (setq aa (tblnext "style"))
   )
   (command "style" "china" "romans,chineset" "" twidth "" "" "" "")
   (print "style setup O.K.")
(prin1)
)

xiang76 发表于 2004-8-13 20:20:00

我工作中也常碰到这问题，请f5612140说详细点好吗？


       


我碰到的是繁体中文 。、多谢

zybocai 发表于 2004-8-14 11:12:00

你们遇见的问题我没见过！

f5612140 发表于 2004-8-15 10:22:00

xiang76发表于2004-8-13 20:20:00static/image/common/back.gif我工作中也常碰到这问题，请f5612140说详细点好吗？       
我碰到的是繁体中文 。、多谢

appload载入,执行ccc
页: [1]
查看完整版本: [求助]请教CAD高手?