请教老师,参照设置控件间距例子做的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编辑过]