Foxtable(狐表)用户栏目专家坐堂 → [求助]富文本框如何绑定狐表字段


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

主题:[求助]富文本框如何绑定狐表字段

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


加好友 发短信
等级:三尾狐 帖子:604 积分:7006 威望:0 精华:0 注册:2012/5/30 16:01:00
[求助]富文本框如何绑定狐表字段  发帖心情 Post By: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
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:604 积分:7006 威望:0 精华:0 注册:2012/5/30 16:01:00
  发帖心情 Post By:2019/12/19 15:55:00 [显示全部帖子]

已解决.谢谢!

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


加好友 发短信
等级:三尾狐 帖子:604 积分:7006 威望:0 精华:0 注册:2012/5/30 16:01:00
  发帖心情 Post By: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

 回到顶部