改变DBGrid的颜色

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

#include <vcl.h>

#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;i<DBGrid1->Columns->Count;i++)

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

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

}

}

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