以文本方式查看主题

-  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=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