以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何变更指定行的背景颜色  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193147)

--  作者:HANZHIGANG
--  发布时间:2024/8/21 15:35:00
--  [求助]如何变更指定行的背景颜色
Dim dr1 As Row = Tables("调度运单_Table1").Current
Dim dr2 As Row = dr1.Clone
dr1.Save ()
dr2.Save()
e.Form.Close()

Tables("调度运单_Table1").Position = dr1.Index

dr1.Style.BackColor = Color.DarkGreen
dr2.Style.BackColor = Color.Blue
想实现变更dr1、dr2这两行的背景颜色。请指导一下,如何实现?


--  作者:有点蓝
--  发布时间:2024/8/21 15:43:00
--  
只能到drawcell事件处理:http://www.foxtable.com/webhelp/topics/0656.htm
--  作者:HANZHIGANG
--  发布时间:2024/8/21 16:05:00
--  
没大想好,如何在Draw Cell事件中找到这两条呢?
--  作者:有点蓝
--  发布时间:2024/8/21 16:35:00
--  
当前行可以这样:
if e.row.index = e.table.rowsel then
e.style = "样式1"
end if

克隆的行如果还没有保存,可以使用行状态判断。保存了就没有办法了
if e.row.datarow = DataRowState.Added then
e.style = "样式2"
end if