Question

易语言超级编辑框

请问一下超级编辑框怎么把文字加粗、也可以把文字取消加粗，会的人给个源码，谢谢了，小弟的邮件：767200212﹫qq.com

Answer 1

.版本 2

.子程序 _文字_被选择

.如果真 (通用对话框3.打开 ())
编辑框1.字体.字体名称 ＝ 通用对话框3.字体名称
编辑框1.字体.字体大小 ＝ 通用对话框3.字体大小
编辑框1.字体.加粗 ＝ 通用对话框3.加粗
编辑框1.字体.倾斜 ＝ 通用对话框3.倾斜
编辑框1.字体.删除线 ＝ 通用对话框3.删除线
编辑框1.字体.下划线 ＝ 通用对话框3.下划线
编辑框1.文本颜色 ＝ 通用对话框3.字体颜色
吧编辑框1 改成超级编辑框

Answer 2

.版本 2
.支持库 iext2

.子程序 _字体_被选择
.局部变量 字符格式, 字符格式
.局部变量 字体, 字体
.局部变量 a, 整数型

.如果 (通用对话框1.打开 () ＝ 真)
字符格式.字体名称 ＝ 通用对话框1.字体名称
字符格式.字体大小 ＝ 通用对话框1.字体大小
.如果 (字体.加粗 ＝ 通用对话框1.加粗)
a ＝ 1
.否则
.如果 (字体.倾斜 ＝ 通用对话框1.倾斜)
a ＝ 2
.否则
.如果 (字体.删除线 ＝ 通用对话框1.删除线)
a ＝ 8
.否则
.如果 (字体.下划线 ＝ 通用对话框1.下划线)
a ＝ 4
.否则

.如果结束

.如果结束

.如果结束

.如果结束
字符格式.效果 ＝ a
超级编辑框1.置默认字符格式 (字符格式)
.否则