FoxPro/Visual FoxPro - fernando

   
Vista:

fernando

Publicado por Problema con buscar (25 intervenciones) el 26/01/2010 21:08:28
Hola amigos tengo un problema que esta por volver loco, les explico.
tengo un formulario con un textbox y un grid. Lo que hago es buscarcar en el text un articulo. lo hago asi.

En el metodo "InteractiveChange"

LOCAL lc, lnRecno
SELECT Articulos
lc = ALLT(THIS.VALUE)
lnRecno = RECNO()
IF articulos.desartic >= lc
IF NOT BOF()
SKIP 1
ENDIF
IF articulos.desartic > lc && debe quedar donde estaba
IF lnRecno <= RECC()
GO RECNO()
ELSE
GO BOTT
ENDIF
RETURN
* ENDIF
IF NOT EMPTY(ORDER()) && busqueda con indice
SEEK lc
ELSE
GO TOP
LOCATE REST FOR articulos.desartic=lc WHILE articulos.desartic <= lc NOOPTIMIZE
ENDIF
ELSE
LOCATE REST FOR articulos.desartic=lc WHILE articulos.desartic <= lc NOOPTIMIZE
ENDIF

IF lnRecno # RECNO()
THISFORM.buscar.grid1.SETFOCUS
THISFORM.buscar.txtCiudades.SETFOCUS
ENDIF
RETURN

Pero que pasa cuando estoy en el programa de vox probando me funciona de mil maravillas pero cuando creo un ejecutable y luego lo ejecuto. La primera ves me busca genial pero despues al volver a intentarlo me envia al ultimo registro y de ahi no se mueve. Y no se porque hace eso si me podrian ayudar saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:fernando

Publicado por Saul  (676 intervenciones) el 27/01/2010 05:06:29
Lo que pasa que los Grid los tienes que Refrescar.. en este caso creo que te funcionaria ReQuery..

Por mi parte el buscar con InteractiveChange es muy lento .. te inmaginas 100 usuarios buscando todos al mismo tiempo.. yo tengo una forma donde busco solo el puro resultado, y el si lo que necesito es ir moviendome por cada fila utilizo el List.. si gustas te mando un copia solo escribeme bye..

Saludos Saul Hernandez..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Para Saul

Publicado por Fernando  (22 intervenciones) el 27/01/2010 20:52:38
enviame por favor te lo voy a agradecer..... mi email es luckypy@hotmail.com

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar