void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
int ARow, TRect &Rect, TGridDrawState State)
{
StringGrid1->Canvas->Brush->Color = StringGrid1->Canvas->Brush->Color;
StringGrid1->Canvas->FillRect(Rect);
if(ACol == 2 && ARow == 1)
{
StringGrid1->Canvas->Font->Color = clRed;
StringGrid1->Canvas->TextOut(Rect.Left, Rect.Top, "Jakiś tekst");
StringGrid1->Canvas->Font->Color = clGeen;
int tWidth = StringGrid1->Canvas->TextWidth("Jakiś tekst");
StringGrid1->Canvas->TextOut(Rect.Left + tWidth, Rect.Top, "tekst");
}
else
{
StringGrid1->Canvas->Font->Color = clBlack;
StringGrid1->Canvas->TextOut(Rect.Left, Rect.Top, StringGrid1->Cells[ACol][ARow]);
}
}