GridHasFocus = (GridObj.ActiveRow > 0)


Sorry Gregory, ill-fatedly two problems exist:
- this is a sufficient condition, but it is not necessary.
- when this is sufficient,
this can to be very slow because every time that comes read the ActiveRow property,
VFP executes a count loop, like this:

* select GridObj.RecordSource
STORE RECNO() TO gridRecno
COUNT ALL WHILE RECNO()#m.CurrentRecno
RETURN _TALLY+1

Fabio