如题
解决方案 »
- fastreport直接打印
- Delphi 怎樣作一個文件夾加密程序
- 我有如下代码,把AdoQuery1里的数据导出到EXCEL中,问题是日期/时间类型的导出了后是#,请问如何解决.
- 如何用TSringlist取得txt文件中的行数?
- 我写的文本编辑器,支持几十种语法高亮,希望能与大家一起完善它
- 把Web Service编译后,怎样把它分发到Web Service的虚拟目录?
- 安装SQL时遇见的问题~
- 两个record变量之间是否能直接赋值?
- 急!卸载linux导致一个重要数据分区没了!解决的给200分,不是开玩笑的。
- 关于Delphi的网络传输编程
- 请问如何实现串口监视
- 如何创建一个饿文件并写入数据
双击DBGrid控件,打开一个Editing DBGrid.Columns窗口,在窗口中点右键,选择ADD ALL Fields项,添加上所有的字段,选择某一个字段,在属性编辑器里设置Color属性就可以了
if(Column->Field->DataSet->RecNo%2)
{
DBGrid1->Canvas->Brush->Color=clSkyBlue;
DBGrid1->Canvas->FillRect(Rect);
DBGrid1->Canvas->Font->Color=clFuchsia;
DBGrid1->DefaultDrawColumnCell(Rect,DataCol,Column,State);over!
begin
DBGrid1.Columns[0].Color:=clBlue;
DBGrid1.Columns[2].Color:=clBlue;
DBGrid1.Columns[4].Color:=clBlue;
end;
这样就可以了,你把中间的三行代码爱写到哪里就写到哪里.
还有楼主在问问题时要把问题说清楚.