查看单个帖子
旧 2009-04-26, 08:51 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 怎样用程序设置字体?

怎样用程序设置字体?
www.dimcax.com
怎样用程序设置字体?
怎样用程序设置字体?(平时高置是用命令“st”)
请问怎样用lisp设置?例如我要选择txt.shx--------hztxt.shx怎样写?谢谢!
勤能补拙

在程序中用(vl-cmdf "style" ........)即可。
command: (command "style")
nil
enter name of text style or [?] <standard>:
existing style.
specify full font name or font filename (ttf or shx) <txt,bigfont.shx>:
specify height of text <0.0000>:
specify width factor <1.0000>:
specify obliquing angle <0.00>:
display text backwards? [yes/no] <n>:
display text upside-down? [yes/no] <n>:
vertical? <n>
"standard" is now the current text style.
< 桐阳模具cad>
< ://tymoju.blogspot.com>

兄弟,你用的是vba吧,我看不懂,有没有lisp的?
勤能补拙

顶下,哪位高手请用lisp程序出招
勤能补拙

(command "style" "hz" "simplex,hztxt" 0 0.7 0 "n" "n")

按楼主的要求,应该为:
(command "style" "hz" "txt,hztxt" 0 0.7 0 "n" "n")

这里还没有人用vba写呀,怎么说是vba呢

lambtonchina
很好,谢谢!但不知是怎样得来这个的(command "style" "hz" "txt,hztxt" 0 0.7 0 "n" "n")?
也就是当我把系统变量filedia设为0来也调试不了,所以我想知道是怎么样得来以上程序命令的
勤能补拙

lisp实现起来不如vba那么方便吧?!
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)