kiry
31 de Agosto del 2005

GRACIAS POR RESPON DERME.
TENGO UN GRID DONDE ME MUESTRA APROX. 1000 APELLIDOS. ADEMAS UNA CAJA DE TEXTO A TRAVEZ DE LA CUAL PUEDO BUSCAR POR ORDEN ALFABETICO. MI PROBLEMA ES QUE CUANDO INGRESO UNA LETRA MU MUESTRA PERO DESDE LA MITAD DEL GRID. NECESITO SABER COMO HAGO PARA QUE EL PRIMER APELLIDO CON DICHA LETRA APAREZCA EN EL PRIMER RENGLON DEL GRID.
KIRY

Andres
31 de Agosto del 2005

Tienes q poner despues del filtro o select GO TOP, por ejemplo

Sele micampo from mibase into cursor migrid
sele migrid
go top
Thisform.Refresh

Lo cierto es q debes incluir solo GO TOP dentro de algun evento q invoque al grid.

kiry
31 de Agosto del 2005

Hola Andres!!gracias por tu ayuda.
Bueno...ingresé GO TOP en el evento INIT-LOAD-GOTFOCUS- pero no funciona!
lo hago en "la caja de texto" en donde ingreso la busqueda.
Agradeceria me des otra mano..
esta es la descripcion:

SELECT profesionales(mitabla)
SEEK ALLTRIM(this.value)
IF FOUND()
GO RECNO()
THISFORM.grid1.REFRESH
ENDIF

V?or Granda
31 de Agosto del 2005

Si los registros que muestras en el grid son producto de un filtro, entonces la respuesta anterior te ayudará, si lo que haces es buscar un registro y posicionarte en el primero que cumpla con el criterio de búsqueda, entonces te servirá lo siguiente:

local lnIter

thisform.LockScreen = .T.
with thisform.grdPersonal
.SetFocus
for lnIter = 1 to (.RelativeRow - 1)
.DoScroll(1)
endfor
.Refresh
endwith
thisform.LockScreen = .F.

V?or Granda
31 de Agosto del 2005

Perdón por la respuesta anterior, no tiene indentación por lo que puede ser poco legible, escríbeme si tienes alguna duda.