FoxPro/Visual FoxPro - Busqueda incremental en grid, posicionar registro

Que hay...

Tengo una busqueda incremental con un textbox y un grid, la busqueda funciona perfecto y para hacer esta busqueda hago esto:

En el interactiveChange del Textbox
BUSCA=TRIM(THISFORM.TEXT1.VALUE)
SEEK BUSCA
IF FOUND()
THISFORM.GRID1.SETFOCUS
THISFORM.TEXT1.SETFOCUS
ENDIF

solo que me gustaria que el registro que tiene el puntero quedara siempre en la primera fila del grid, siempre me muestra el registro actual a la mitad del grid o si esta a la vista del grid lo deja donde esta, solo mueve el puntero. He estado jugando un poco con relativerow y activerow, haciendo tambien doscroll, pero no tengo el resultado que quiero... alguna idea de como lograrlo?

Porque no intentas hacer una consulta sql para que no te lo busque con seek(), si que te lo busque con where >, o vien where < espero te sirva..

Hola!
realmente no sé como hacer eso que quieres, pero si quieres identificar el registro facilmente, puedes cambiarle el color.
una vez hice lo sig. con el mismo codigo que usas:
luego del SEEK(BUSCA)
xregist=recno() && tomas el numero de registro

en el evento dynamicbackcolor del column del grid pones:
IIF(recno()=xregist,RGB(0,0,0),RGB(255,255,255))

esto hace que el registro donde estás se ponga con fondo negro.
el ejemplo lo puedes sacar del generador de grids con el estilo ELEGANTE.
espero te sirva.
Uplift