易语言设置字体:
----------------------------------------
.版本 2
.子程序 _设置字体_被选择
.局部变量 新字体, 字体
通用对话框1.类型 = 2
.如果真 (通用对话框1.打开 () = 假)
返回 ()
.如果真结束
新字体.加粗 = 通用对话框1.加粗
新字体.倾斜 = 通用对话框1.倾斜
新字体.删除线 = 通用对话框1.删除线
新字体.下划线 = 通用对话框1.下划线
新字体.字体名称 = 通用对话框1.字体名称
新字体.字体大小 = 通用对话框1.字体大小
编辑框.字体 = 新字体
编辑框.文本颜色 = 通用对话框1.字体颜色
-----------------------------------------
附送易语言记事本代码,可以参考。