Foxtable(狐表)用户栏目专家坐堂 → [求助]单元格绘制


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

主题:[求助]单元格绘制

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


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/11 8:33:00 [显示全部帖子]

    If e.Col.Name = "突显" Then
        If e.row("名称").EndsWith("废品")
            e.Style = "红色"
    End If
End If

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


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/30 14:55:00 [显示全部帖子]

    If e.Col.Name = "突显" Then
        If e.row("名称").EndsWith("废品")
            e.Style = "红色"
e.Graphics.DrawRectangle(Brushes.Red,e.x + 1,e.y + 1, Width, e.Height - 2)
    End If
End If


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


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/30 15:36:00 [显示全部帖子]

把表格样式改为foxtable经典蓝

drawcell事件
If e.Col.Index = e.Table.ColSel AndAlso e.Row.Index = e.Table.RowSel Then
    e.Graphics.DrawRectangle(New Pen(Color.Red,2),e.x + 1,e.y + 1, e.Width-4, e.Height - 4)
End If

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


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/30 16:07:00 [显示全部帖子]

请上传实例测试

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


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/30 17:10:00 [显示全部帖子]

测试了一下,没有办法,绘制和样式只能使用其中一个

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


加好友 发短信
等级:超级版主 帖子:106081 积分:539504 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/30 17:31:00 [显示全部帖子]

这个就是判断节点单元格的代码

If e.Col.Index = e.Table.ColSel AndAlso e.Row.Index = e.Table.RowSel Then
    e.Graphics.DrawRectangle(New Pen(Color.Red,2),e.x + 1,e.y + 1, e.Width-4, e.Height - 4)
else
设置样式
End If

 回到顶部