[下载][原创]cad 字体样式轻松修改(源码)

leogao

是不是该对style命令提点要求了？
看看这个吧
命令：est
程序源文件 easystyle.lsp
superstyle.odc
需加载 easystyle.lsp
doslib2k.arx
objectdcl.arx (晓东有去评估提示的版本) 预览
功能：
1. 将选择的style设为当前(第一个下拉框)
2. 选择文字将其style设为当前(第一个按钮)
3.先选文字，再选择一个Style，可以一次把所选的文字的style修改。（不管原来是什么，改为所选的，包括修改宽度比例，倾斜角度）(第一个下拉框)
4. 修改style
5. 新增style
6. 如果图里用到的字体你没有，可以一次用别的字体替换，style名不变(最后一个按钮)。
7. 预览功能
8. 图纸切换自动更新 需要完善的地方：
1. 不支持truetype字体
请那位大侠写一个得到系统truetype字体列表的子函数吧
最好可以把结果写在一个文本里，一行一个
另外，怎么判断该字体是否有粗体，斜体，粗斜体？
2. 打开新图时，它不自动更新，如何解决？ 奉献源码，请大家帮忙完善！不胜感激！ 忘了说了，需要建一个子目录“d:\leohelp\" 我偷懒，把字体列表放在这个目录下没改

xshrimp

等待高手完善解决,希望能将所需文件一期打包。

zazhz123

不能用
命令一执行就弹出

江湖远人

怎么回复这么少啊？还有用过的吗？