如何让TStringGrid的指定单元格的文字为指定颜色，其它单元格文字颜色不变？

[sinth]

RT

[MEFULEU]

void __fastcall TcurveForm::sgridDrawCell(TObject *Sender, int ACol,
int ARow, TRect &Rect, TGridDrawState State)
{
try


{
if (ARow==1) sgrid->Canvas->Brush->Color =clBtnFace;

if(ARow >=sgrid->RowCount-4)
{
sgrid->Canvas->Font->Color = clBlue;

if(ARow%2 == 0)
{
sgrid->Canvas->Brush->Color=TJBckColor;
}
else
{
sgrid->Canvas->Brush->Color=TColor(TJBckColor-colorm);
}
}

sgrid->Canvas->FillRect(Rect);
DrawText(sgrid->Canvas->Handle, sgrid->Cells[ACol][ARow].c_str(), -1, (RECT*)&Rect, DT_SINGLELINE | DT_VCENTER | DT_CENTER);
}
catch(Exception &e)
{
return;
//dtmJCEConnection->ErrRecord(2, e.Message, "TcurveForm::sgridDrawCell");
}

}

[niuzhenjun]

up

[sinth]

不行啊！！