Hola Luvac.
Hagamos el último intento, te adjunto el código de prueba que funciona correcto en Delphi 7 y probalo con el XE4, por ahí encontras como adecuarlo...
Recordá que si te da problemas el reescribir la clase
TStringGrid podes eliminar esa parte del código y declarar la variable
RowSelected como global a la unidad.
Saludos