Foxtable(狐表)用户栏目专家坐堂 → [求助] 在DRAWCELL设置了选定行颜色后,一点合计行就崩溃


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

主题:[求助] 在DRAWCELL设置了选定行颜色后,一点合计行就崩溃

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


加好友 发短信
等级:婴狐 帖子:15 积分:220 威望:0 精华:0 注册:2017/5/8 0:29:00
[求助] 在DRAWCELL设置了选定行颜色后,一点合计行就崩溃  发帖心情 Post By:2017/5/13 23:14:00 [只看该作者]

问老师  在DRAWCELL里面设置了选定行色彩  但在表中按上下键盘浏览数据的时候 只要一到最后的合计行就会出错 
这个需要如何避免呢?

 

下面是截图和文件包
 
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170513230636.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170513230706.png
图片点击可在新窗口打开查看

 


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:工商数据查询2.zip

[此贴子已经被作者于2017/5/14 19:47:27编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110608 积分:562942 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/15 9:08:00 [只看该作者]

首先,AddUserStyle这类代码不要放在这个事件中,效率非常低,应该预先定义好或者放到AfterOpenProject事件


'=====选定行背景颜色===
If e.Table.Current IsNot Nothing AndAlso e.Row.Index = e.Table.Current.Index Then
    e.Table.DataTable.AddUserStyle("选", Color.Yellow, Color.Black)
    e.style = "选"
End If

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


加好友 发短信
等级:婴狐 帖子:15 积分:220 威望:0 精华:0 注册:2017/5/8 0:29:00
  发帖心情 Post By:2017/5/15 10:12:00 [只看该作者]

以下是引用有点蓝在2017/5/15 9:08:00的发言:
首先,AddUserStyle这类代码不要放在这个事件中,效率非常低,应该预先定义好或者放到AfterOpenProject事件


'=====选定行背景颜色===
If e.Table.Current IsNot Nothing AndAlso e.Row.Index = e.Table.Current.Index Then
    e.Table.DataTable.AddUserStyle("选", Color.Yellow, Color.Black)
    e.style = "选"
End If

请问老师  如果放在项目的 AfterOpenProject中 这个应该如何写呢?


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/15 10:16:00 [只看该作者]

 

DataTables("工商暂停").AddUserStyle("选", Color.Yellow, Color.Black)

 


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


加好友 发短信
等级:婴狐 帖子:15 积分:220 威望:0 精华:0 注册:2017/5/8 0:29:00
  发帖心情 Post By:2017/5/15 14:25:00 [只看该作者]

以下是引用有点色在2017/5/15 10:16:00的发言:

 

DataTables("工商暂停").AddUserStyle("选", Color.Yellow, Color.Black)

 

不好意思,老师,由于才接触,式了半天没成功。但功能又迫切需要实现。

在DRAWCELL直接用上面的套换还没问题,考虑到老师说的效率问题 想直接用于 AfterOpenProject中

麻烦老师能不能帮我将这个当前行的式样 如何项目属性的 AfterOpenProject中完整表达,完整的写法写下。谢谢



 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110608 积分:562942 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/15 14:45:00 [只看该作者]

AfterOpenProject
DataTables("工商暂停").AddUserStyle("选", Color.Yellow, Color.Black)

DRAWCELL
'=====选定行背景颜色===
If e.Table.Current IsNot Nothing AndAlso e.Row.Index = e.Table.Current.Index Then
    e.style = "选"
End If


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/15 14:53:00 [只看该作者]

 你就按照原来的写法把,不然你要列出所有的可能的样式的。

 

 比如,依次类推......

 

DataTables("工商暂停").AddUserStyle("选", Color.Yellow, Color.Black)

DataTables("工商暂停").AddUserStyle("单行", Color.Yellow, Color.Black)

DataTables("工商暂停").AddUserStyle("双行", Color.Yellow, Color.Black)

 

DataTables("工商暂停").AddUserStyle("四类行_日期", Color.Yellow, Color.Black)

DataTables("工商暂停").AddUserStyle("四类行_t", Color.Yellow, Color.Black)

DataTables("工商暂停").AddUserStyle("四类行_1", Color.Yellow, Color.Black)

 

DataTables("工商暂停").AddUserStyle("四类_日期", Color.Yellow, Color.Black)

DataTables("工商暂停").AddUserStyle("四类_t", Color.Yellow, Color.Black)

DataTables("工商暂停").AddUserStyle("四类_1", Color.Yellow, Color.Black)

 


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


加好友 发短信
等级:婴狐 帖子:15 积分:220 威望:0 精华:0 注册:2017/5/8 0:29:00
  发帖心情 Post By:2017/5/15 15:28:00 [只看该作者]

额 原来是要分两部分写  
AfterOpenProject  写试验

DRAWCELL写判断动作

谢谢

 回到顶部