안녕하세요
제가 해본 소스를 기냥 여기다 복사했습니다

void __fastcall TForm1::FormCreate(TObject *Sender)
{
    // 전역변수들입니다.. 초기화하는 중이구요 ^^
    // 전 클래스 멤버 변수로 했슴다...

    preCol = -1; preRow = -1; iCol = -1; iRow = -1;
}

void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
    // 이 이벤트는 해당 셀마다 각기 한번씩 들어 옵니다..
    // 그래서 각기 셀마다 여기서 원하는 작업을 하실 수 있지요 ^^

    if (iCol == ACol &&  iRow == ARow)
    {
        StringGrid1->Canvas->Brush->Color = clRed;
        StringGrid1->Canvas->FillRect(Rect);
    }
}

void __fastcall TForm1::StringGrid1MouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
    StringGrid1->MouseToCell(X, Y, iCol, iRow);
    if (preCol != iCol || preRow != iRow)
    {
        // Repaint를 해야 OnDrawCell 이 발생합니다....
        StringGrid1->Repaint();
        preCol = iCol;
        preRow = iRow;
    }
}

그럼 즐거운 하루 되세요...

turker 님이 쓰신 글 :
: 안녕하세요... stringgrid에 대한 질문인데요...
: 검색해도 마우스에 따른 cell색깔 바꾸기는 없는 것 같더라구요..
: string grid에서 마우스가 올라가 있는 cell만 색깔을 바꾸려면 어떻게 해야 할까요...
:
: 모든 cell은 흰 색이고 마우스가 올라가 있는 cell만 빨강, 또 벗어나면 다시 원래대로 흰 색...이런 식으로 하려면 어떻게 해야 하는 지 좀 알려주세요...
:
: ondrawcell에서 마우스가 올라가있는 것을 인식할 수 있는 방법이 있을까요?