如何改变当前记录的字体颜色？？是整条记录，不仅只是某一列,请高手帮助。

Question

在DBGrid中，当通过adoquery1.Locate定位到当前记录时，如何改变该记录的显示颜色，如，使
整条记录变为红色。请高手帮助。

Answer 1

设置一个全局变量CurNo
然后在Locate后，赋CurNo:=adoquery1.RecNo;刷新DBGrid;然后在DBGrid中的DBGrid1DrawColumnCell事件中写上
  if DataCol=CurNo then
    DBGRid1.Canvas.Font.Color := clRed；

Answer 2

wuqiu(午秋) ：字体颜色还是不会变啊，如果加了句　DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);　会使所有记录的一个字段变色，请问该如何解决？？