Foxtable(狐表)用户栏目专家坐堂 → 关于RichTextBox的问题


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

主题:关于RichTextBox的问题

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


加好友 发短信
等级:五尾狐 帖子:1172 积分:8772 威望:0 精华:0 注册:2012/4/18 16:28:00
关于RichTextBox的问题  发帖心情 Post By:2018/6/29 11:56:00 [显示全部帖子]

请教老师,参照设置控件间距例子做的panel上的间距设置,在窗口的Table点击行后,panel上的内容只会固定在第一行显示列的内容,current第二行或其他行后,panel里面的内容不会变化(不会像textbox绑定列的变化)

如果Table不在窗口设置,可以正常根据current行显示

 

下面代码写在CurrentChanged

 

Dim r As Row = Tables("会议纪要_Table1").Current
If r IsNot Nothing Then
    If Tables("会议纪要_Table1").Current IsNot Nothing Then
    Dim rtxt As New Windows.Forms.RichTextBox
    UtilsSetLineSpace.SetLineSpace(rtxt, 400)
    rtxt.name = "mytxt"
    rtxt.Dock = 5
    e.Form.Controls("Panel5").BaseControl.Controls.Add(rtxt)
    rtxt.Multiline = True
    rtxt.BackColor = Color.WhiteSmoke
    rtxt.Text = Tables("会议纪要_Table1").Current("正文内容")
    addhandler rtxt.TextChanged, addressof mytxt_TextChanged
    End If
End If

[此贴子已经被作者于2018/6/29 12:08:20编辑过]

 回到顶部