以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]富文本框如何绑定狐表字段  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144426)

--  作者:coch2004
--  发布时间:2019/12/19 15:49:00
--  [求助]富文本框如何绑定狐表字段
    \'增加一个富文本框
    Dim rtxt As New System.Windows.Forms.RichTextBox
    UtilsSetLineSpace.SetLineSpace(rtxt, 300)
    rtxt.name = "TextBox1"
    rtxt.Dock = 5
    e.Form.Controls("Panel1").BaseControl.Controls.Add(rtxt)
    rtxt.Multiline = True
e.Form.Controls("Panel1").BaseControl.Controls("TextBox1").BindingField =e.form.name & "_table1.Information"         \'\'\'\'  BindingField  不是有用的参数.


请问大神如何解决?

--  作者:coch2004
--  发布时间:2019/12/19 15:55:00
--  
已解决.谢谢!
--  作者:有点蓝
--  发布时间:2019/12/19 15:56:00
--  
无法绑定,只能通过代码取值和赋值
--  作者:coch2004
--  发布时间:2019/12/19 16:22:00
--  
图片点击可在新窗口打开查看  
  If e.Form.Controls("Panel1").BaseControl.Controls("TextBox1").DataBindings.Count =0 Then
        e.Form.Controls("Panel1").BaseControl.Controls("TextBox1").DataBindings.add("Text",Tables(e.Form.Name & "_Table1").Grid.DataSource, "Information")
    End If

--  作者:有点蓝
--  发布时间:2019/12/19 16:39:00
--  
图片点击可在新窗口打开查看学习了