텍스트 뿐 아니라 배경도 같이 그려줘야 합니다.
먼저 StringGrid의 DefaultDrawing값을 false 로  해주고, 다음과 같이 해 보세요.

void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol, int ARow, TRect &Rect,
		  TGridDrawState State)
{
	if (State.Contains(gdFixed)){
		StringGrid1->Canvas->Brush->Color = clBtnFace;
		StringGrid1->Canvas->Font->Color = clWindowText;
		StringGrid1->Canvas->FillRect(Rect);
		//Frame3D(StringGrid1->Canvas, Rect, clBtnHighlight, clBtnShadow, 1);
		GradientFillCanvas( StringGrid1->Canvas, (TColor)0x00F0F0F0, (TColor)0x00C0C0C0, Rect, gdVertical );
	}else if (State.Contains(gdSelected)){
		StringGrid1->Canvas->Brush->Color = clHighlight;
		StringGrid1->Canvas->Font->Color = clHighlightText;
		StringGrid1->Canvas->FillRect(Rect);
	}else{
		StringGrid1->Canvas->Brush->Color = StringGrid1->Color;
		StringGrid1->Canvas->Font->Color = StringGrid1->Font->Color;
		StringGrid1->Canvas->FillRect(Rect);
	}

	StringGrid1->Canvas->Brush->Style = bsClear;
	DrawText( StringGrid1->Canvas->Handle,  StringGrid1->Cells[ACol][ARow].w_str(), -1, &Rect, DT_SINGLELINE | DT_CENTER | DT_VCENTER );
}

배경을 이쁘게 그리기 위해서 Frame3D나 GradientFillCanvas 등의 함수를 이용할 수 있습니다.


레쓰비 님이 쓰신 글 :
: StringGrid관련 도움을 청합니다.
:
: DrawCell 을 이용해서 가운데 정렬시 문제가 되네요~
:
: StringGrid의 DrawingStyle 속성이 gdsThemed에서 첨부이미지와 같은 현상이 나타납니다.
:
: gdsClassic에서는 문제 없습니다. 예전 빌더에는 DrawingStyle 이라는 속성이 없었는데 새로 생겨서 인지
:
: 문제가 되네요~~~
:
: void __fastcall TfrmPmLmt::sgrdListDrawCell(TObject *Sender, int ACol, int ARow,
:           TRect &Rect, TGridDrawState State)
: {
:     unsigned oldalign = SetTextAlign(sgrdList->Canvas->Handle, TA_CENTER);
:     sgrdList->Canvas->TextRect(Rect, (Rect.Right+Rect.Left)/2, Rect.Top+1, sgrdList->Cells[ACol][ARow]);
:     SetTextAlign(sgrdList->Canvas->Handle, oldalign);
: }