以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 自动标颜色  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75794)
--  作者：wumingrong1
--  发布时间：2015/10/15 9:15:00
--  [求助] 自动标颜色

1、我想实现当某行被修改后，被修改的行能够自动被标上颜色；命令如下：

If CurrentTable.Current.DataRow.RowState <> DataRowState.Unchanged Then

    e.Style = "被修改"
End If

可是结果是被修改的表全部变了颜色，我的命令该怎么修改？

2、如果我想实现当鼠标点击某行时、被点击的行能够被标上颜色；我的命令该怎么写？
--  作者：Hyphen
--  发布时间：2015/10/15 9:31:00
--  

参考

http://www.foxtable.com/help/topics/0656.htm

 
--  作者：大红袍
--  发布时间：2015/10/15 9:44:00
--  

1、

 

If e.Row.DataRow.RowState <> DataRowState.Unchanged Then
    e.Style = "被修改"
End If
 
2、
 
If e.Table.Current.Index = e.Row.Index Then
    e.Style = "当前行"
End If
--  作者：wumingrong1
--  发布时间：2015/10/15 10:13:00
--  
1、以上命令在单个表中可以实现功能啦；

2、但是如果我希望整个项目的所有表都能有这样的功能；我在项目属性的DrawCell中写了以下命令

If e.Table.Current.Index = e.Row.Index Then
    e.Style = "当前行"
End If

If e.Row.DataRow.RowState <> DataRowState.Unchanged Then
    e.Style = "被修改"
End If

然后在各个表的 【自定义样式】中都定义了颜色，为什么实现不了功能？
--  作者：大红袍
--  发布时间：2015/10/15 10:17:00
--  

开启一下drawcell事件

 

http://www.foxtable.com/help/topics/0671.htm