以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于代码编辑器的字体设置  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87176)
--  作者：无我是天机
--  发布时间：2016/7/5 11:21:00
--  [求助]关于代码编辑器的字体设置
代码编辑器的字体太小了，虽然可以按住Ctrl+滑动鼠标，把字体变大。但是不能保存这个设置，每次打开编辑器都要这样操作一次，不方便。能否在编辑器右边增加一个类似保存的按钮，可以保存设置好的字体大小？
--  作者：大红袍
--  发布时间：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