改变DBGrid的颜色

　　//---------------------------------------------------------------------------

　　#include

　　#pragma hdrstop

　　#include "Unit1.h"

　　//---------------------------------------------------------------------------

　　#pragma package(smart_init)

　　#pragma resource "*.dfm"

　　TForm1 *Form1;

　　//---------------------------------------------------------------------------

　　__fastcall TForm1::TForm1(TComponent* Owner)

　　 : TForm(Owner)

　　{

　　}

　　//---------------------------------------------------------------------------

　　void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender,

　　 const TRect &Rect, int DataCol, TColumn *Column,

　　 TGridDrawState State)

　　{

　　if(Column->Field->DataSet->RecNo%2)

　　 {

　　 DBGrid1->Canvas->Brush->Color=clSkyBlue;

　　 DBGrid1->Canvas->FillRect(Rect);

　　 }

　　DrawText(DBGrid1->Canvas->Handle, Column->Field->Text.c_str(),-1,(RECT*)&Rect,DT_SINGLELINE DT_VCENTER DT_CENTER);

　　}

　　//---------------------------------------------------------------------------

　　void __fastcall TForm1::Button1Click(TObject *Sender)

　　{

　　for(int i=0;iColumns->Count;i++)

　　{ if(i%2==0)DBGrid1->Columns->Items[i]->Color=clAqua;

　　 else DBGrid1->Columns->Items[i]->Color=clInfoBk;

　　}

　　}

　　//-----------------------------------------------------------------