- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]“标记”切换按钮的代码？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=79788)
-- 发布时间：2016/1/8 22:40:00
-- [求助]“标记”切换按钮的代码？
此主题相关图片如下：qq图片20160108223650.png
如上图，红色前头所指按钮的代码？请“大红袍”老师指点！
[此贴子已经被作者于2016/1/8 23:12:53编辑过]
-- 发布时间：2016/1/9 9:11:00
--
创建一个新项目，导入系统菜单，就可以查看所有菜单按钮的代码了
-- 发布时间：2016/1/9 12:09:00
-- 回复：（Hyphen）创建一个新项目，导入系统菜单，就可...
Common_Edit_MarkCell_PressedChanged
MarkModifedCell =
e.ToggleButton.Pressed
For Each t As
Table In Tables
t.Refresh
Next
代码如上，老师能详解一下吗？
-- 发布时间：2016/1/9 20:17:00
-- 回复：（wyz20130512）回复：（Hyphen）创建一个新项目...
问题解决了。将如下代码写在表的DrawCell事件中即可，这比系统菜单的“标记”按钮更具灵活性。
e.Table.DataTable.AddUserStyle("标记",Color.Red,Color.White)
If e.Row(e.Col.Name) <> e.Row.DataRow.OriginalValue(e.Col.Name) Then
e.Style = "标记"
End If
[此贴子已经被作者于2016/1/9 20:19:05编辑过]