如何让当前行的颜色(该行的底色及字体颜色)发生改变?一般来说选中整行可以实现这个效果,当我要求是非选中整行时(即无论点该行的哪一格都要有这种效果)
解决方案 »
- 动态SQL语句的问题?????
- 实在搞不定了, 有代码(win32form及activeform差异?)麻烦帮看看。
- ADO和SYBASE如何建立数据库连接?很急,请各位大虾帮忙
- cell333控件套打问题?????
- 如何实现在程序中集成短信群发功能!怎么样使用网站中的短信群发网关!在线等待!
- 为什么sql server数据库还原会出现问题?
- 主从表的新增,修改删除.
- delphi 2005有TRvProject、TRvSystem、TRvQueryConnection这些组件吗?懂的进来帮帮忙...
- SQL SERVER存储过程对IMAGE对象的赋值问题
- 请问如何升级本机的ODBC到更高的版本。
- 高分求解,form显示速度问题
- formula one如何获得页码?(100分)
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
with DBGrid1.Canvas do begin
if DBGrid1.MouseCoord(Rect.Left+1, Rect.Top+1).Y = TMyGrid(DBGrid1).Row then begin
Brush.Color := clRed; // 背景色
Font.Color := clWhite; // 前景色
end
else begin
Brush.Color := clWindow;
Font.Color := clWindowText;
end;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;