Foxtable(狐表)用户栏目专家坐堂 → [求助]关于代码编辑器的字体设置


  共有2148人关注过本帖树形打印复制链接

主题:[求助]关于代码编辑器的字体设置

帅哥哟,离线,有人找我吗?
无我是天机
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:233 积分:2602 威望:0 精华:0 注册:2013/9/2 23:31:00
[求助]关于代码编辑器的字体设置  发帖心情 Post By:2016/7/5 11:21:00 [只看该作者]

代码编辑器的字体太小了,虽然可以按住Ctrl+滑动鼠标,把字体变大。但是不能保存这个设置,每次打开编辑器都要这样操作一次,不方便。能否在编辑器右边增加一个类似保存的按钮,可以保存设置好的字体大小?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/5 11:52:00 [只看该作者]

测试了一下,无法设置。获取编辑框这样写,但设置字体属性和本来的设置有冲突,设置不了

 

mark

 

Dim frm  = windows.forms.form.activeform
If frm IsNot Nothing Then
    If frm.name = "Class197" Then
        Dim edit = frm.Controls("SplitContainer1").Panel1.Controls("MyCodeEditor21").Controls("SplitContainer1").Panel1.Controls("SplitContainer2").panel1.controls("Editor")
        'edit.SelectionFont = new font("宋体", 20)
    ElseIf frm.name = "Class260" Then
        Dim edit = frm.Controls("MyCodeEditor1").Controls("SplitContainer1").Panel1.Controls("SplitContainer2").panel1.controls("Editor")
        'edit.SelectionFont  = new font("宋体", 20)
    End If
End If


 回到顶部