单击加亮显示有关问题

单击加亮显示问题
请问如何单击一行时将整行加亮显示？以下代码为何没有效果
long   currentrownumber
currentrownumber=dw_customer.getrow()
if   currentrownumber   > 0   and   currentrownumber   <=   dw_customer.rowcount()   then
dw_customer.selectrow(0,FALSE)
dw_customer.selectrow(currentrownumber,true)
dw_customer.setrowFocusIndicator(off!)
end   if

------解决方案--------------------
你在dw的clicked事件里面写如下代码即可:
selectrow(0,false)
if row > 0 then
selectrow(row,true)
scrolltorow(row)
end if
------解决方案--------------------
数据窗口的Clicked事件：
If Row > 0 Then
This.ScrollToRow(Row)
This.SetRow(Row)
This.SelectRow(0,False)
This.SelectRow(Row,True)
End If