palw 你好:
(1)有關修改顏色的部分，一樣寫在 DrawCell 裡面
(2)修改每一個 Cell 值的部分，可以寫在其他的地方，在修改完值以後，加上
   這一行程式碼，就可以強迫重畫 StringGrid1->Repaint();
(3)以下是範例程式碼
void __fastcall TForm1::StringGrid2DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
   if(ACol>0 && ARow>0)
   {
      if(StringGrid2->Cells[ACol][ARow]=="0")
      {
         StringGrid2->Canvas->Brush->Color=clRed;
      }
      else if(StringGrid2->Cells[ACol][ARow]=="1")
      {
         StringGrid2->Canvas->Brush->Color=clGreen;
      }
      else
      {
         StringGrid2->Canvas->Brush->Color=clBlue;
      }
      StringGrid2->Canvas->FillRect(Rect);
      StringGrid2->Canvas->TextOut(Rect.Left 2, Rect.Top 2,
                                   StringGrid2->Cells[ACol][ARow]);
   }
}
void __fastcall TForm1::Button13Click(TObject *Sender)
{
   for(int i=1; iColCount; i  )
   {
      for(int j=1; jRowCount; j  )
      {
         StringGrid2->Cells[i][j]=IntToStr(((i j)%2));
      }
   }
   StringGrid2->Repaint();
}