以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]“标记”切换按钮的代码?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=79788)

--  作者:wyz20130512
--  发布时间:2016/1/8 22:40:00
--  [求助]“标记”切换按钮的代码?

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20160108223650.png
图片点击可在新窗口打开查看
如上图,红色前头所指按钮的代码?请“大红袍”老师指点!
[此贴子已经被作者于2016/1/8 23:12:53编辑过]

--  作者:Hyphen
--  发布时间:2016/1/9 9:11:00
--  
创建一个新项目,导入系统菜单,就可以查看所有菜单按钮的代码了


--  作者:wyz20130512
--  发布时间: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


代码如上,老师能详解一下吗?


--  作者:wyz20130512
--  发布时间: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编辑过]