Nadya

I got this code from a reply made by Walter Messter in response to a question similar to mine.

>Hi Alan,
>
>Thanks for your reply. So, if I put the method LocatedRecordOnTop to my grid subclass, may I put you as an other?
>
>Thanks again.
>
>>I found a couple of solutions but this one is the easiest:
>>
>>>If x is the RECNO() of the record I want to appear at the top of the grid, how do I force the grid to scroll up or down so that row is at the top?
>>
>>this one is easy to manage, make an new method for the grid:
>>**************************************************************
>>THISFORM.LockScreen=.T.
>>nHeight = THIS.Height
>>THIS.Height = THIS.HeaderHeight + THIS.RowHeight
>>THIS.Refresh
>>THIS.Height=nHeight
>>THISFORM.LockScreen=.F.
>>***************************************************************
>>
>>