TRect rect = Rect;
StringGrid1->Canvas->Font = StringGrid1->Font;
if (ACol>=0 && State.Contains(gdFixed))
{
rect.right++;
rect.Bottom++;
StringGrid1->Canvas->Font->Color = clBlack;
StringGrid1->Canvas->Brush->Style = bsClear;
StringGrid1->Canvas->Font->Style = TFontStyles()<< fsBold;
DrawText(StringGrid1->Canvas->Handle, StringGrid1->Cells[ACol][ARow].c_str(),
StringGrid1->Cells[ACol][ARow].Length(), &rect,
DT_CENTER +2 | DT_CENTER +3 );
}
else
{
StringGrid1->Canvas->FillRect(rect);
if(ACol>=2)
DrawText(StringGrid1->Canvas->Handle, StringGrid1->Cells[ACol][ARow].c_str(),StringGrid1->Cells[ACol][ARow].Length(), &rect,DT_RIGHT | DT_RIGHT );
else
DrawText(StringGrid1->Canvas->Handle, StringGrid1->Cells[ACol][ARow].c_str(),StringGrid1->Cells[ACol][ARow].Length(), &rect,DT_CENTER | DT_CENTER );
}