怎样使DBGrid网格颜色为黑色,默认是灰色的
解决方案 »
- 服务程序与数据库据连接问题
- 查询时间与datetimepicker的时间比较问题
- 那位高手会?使STRINGGRID的ROW进行跳动?
- 有没有采用ctBlocking方式收数据的ClientSocket的例子,急需,要测试通过的
- 如何在delphi中调用telnet,有现成的控件吗?
- 在delphi 中可不可以用BCP
- 向数据库服务器传递数据
- 刚从C++转道DELPHI。请大家帮帮忙啊
- 删除DBGrid中的记录的同时数据库中的记录也被删除
- 向各位请教:华硕P2-b最高支持什么CPU?
- 沈阳的Delphi程序员工资大概多少啊?
- 如何让DELPHI在DEBUG时象VB一样绕过VCL的源码?(即Step into 和 Step Over)时不跟进VCL源码?
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
with DBGrid1.Canvas do begin
Brush.Color := clBlack;
DBGrid1.Canvas.FrameRect(Classes.Rect(Rect.Left-1, Rect.Top-1,
Rect.Right+1, Rect.Bottom+1));
end;
end;