Foxtable(狐表)用户栏目专家坐堂 → 窗口中绑定Normal型非副本临时表如何列居中?


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

主题:窗口中绑定Normal型非副本临时表如何列居中?

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


加好友 发短信
等级:童狐 帖子:251 积分:3384 威望:0 精华:0 注册:2012/7/20 12:15:00
窗口中绑定Normal型非副本临时表如何列居中?  发帖心情 Post By:2017/8/29 10:59:00 [只看该作者]

Dim LSdb As New DataTableBuilder("统计报表")
LSdb.AddDef("公司名称",Gettype(String))
LSdb.AddDef("姓名",Gettype(String))
LSdb.AddDef("姓性别",Gettype(String))
LSdb.Build()
Dim r As Row = Tables("统计报表").AddNew()
r("公司名称") = "aaa"

            For Each c As Col In Tables("统计报表").Cols
                c.TextAlign = TextAlignEnum.Center
            Next
            Dim tbctl As WinForm.Table = e.Form.Controls("Table")
            Dim tb As Table = tbctl.Table        'tb为Normal非副本                           
            tb.DataSource = DataTables("统计报表")
            tb.AllowEdit = False
            tb.UseVisualStyle = False
            e.Form.Controls("Table").Visible = True
            Tables("统计报表").UseVisualStyle = False
            DataTables("统计报表").SysStyles("EmptyArea").BackColor = Color.White

执行后,Tables("统计报表")数据居中了,但是窗口中的tb没有居中,且列宽也跟Tables("统计报表")中的不一致。
看起来窗口汇总的一切属性没有从Tables("统计报表")继承过来

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/29 11:41:00 [只看该作者]

For Each c As Col In tbctl.Table.Cols
    c.TextAlign = TextAlignEnum.Center
Next

 回到顶部