[roman]

En el evento OnMouseDown del StringGrid intenta poner esto:

Código Delphi [-]
var
  GridCoord: TGridCoord;

if Button = mbRight then
begin
  // Obtener las coord. de la celda bajo el cursor
  GridCoord := StringGrid1.MouseCoord(X, Y);

  // Seleccionar la celda
  StringGrid1.Col := GridCoord.X;
  StringGrid1.Row := GridCoord.Y;  
end;

// Saludos