Por Favor si alguien me ayuda empece a utilizar tsbrowse 1.7
tengo problemas al borrar un registro y moverme con las flechas de arriba abajo se vuelve loco se desordena el browse y en la parte superrior del browse quedan registros que aparentemente son duplicados ,pero no lo son, asumo que son los borrados pero no se tiene acceso a ellos
Gracias
_
Problemas con tsbrowse 1.7
Re: Problemas con tsbrowse 1.7
_.
La versión original de TSBrowse 7.xx viene con problemas de ese tipo, el post del 16 de Diciembre fgondi da solución a los problemas de esta versión, pero ni aun así resolví yo el problema, yo regrese a la la versión 6.0, y no tengo ese tipo de problemas.
Si alguien por ahí ya tiene la versión mejorada, varios le agradeceríamos que la proporcionara.
fco_ozuna@prodigy.net.mx
La versión original de TSBrowse 7.xx viene con problemas de ese tipo, el post del 16 de Diciembre fgondi da solución a los problemas de esta versión, pero ni aun así resolví yo el problema, yo regrese a la la versión 6.0, y no tengo ese tipo de problemas.
Si alguien por ahí ya tiene la versión mejorada, varios le agradeceríamos que la proporcionara.
fco_ozuna@prodigy.net.mx
- AngelSalom
- Posts: 664
- Joined: Fri Oct 07, 2005 7:38 am
- Location: Vinaros (Castellón ) - España
- Contact:
Yo después de mucho rabiar hago esto y funciona bastante bien.
Al borrar :
(cAlias)->(DbDelete())
(cAlias)->(DbUnLock())
(cAlias)->(DbSkip())
oLbx:SetFocus()
If !(cAlias)->(Eof())
oLbx:Refresh()
Else
oLbx:GoUp()
oLbx:Refresh()
Endif
También puedes probar con :
oLbx:SetFocus()
oLbx:UpStable()
oLbx:Refresh()
O con :
Function RefrescaBrowse (oLbx)
/* ====================================================================================================
Hace un refresco correcto del browse que se le pasa.
Adaptado al tsbrowse 7.1
Parámetros:
oLbx . Listbox a procesar
Devuelve (nil)
----------------------------------------------------------------------------------------------------
Fecha creación:06/12/2005 19:44
Creado por:Angel
Última revisión:06/12/2005 19:45
Revisado por:Angel
====================================================================================================
*/
oLbx:SetFocus()
oLbx:ResetBarPos()
oLbx:UpStable()
oLbx:Reset()
oLbx:Refresh()
Return (nil)
De todas formas, el tsbrowse 7.1 se vuelve turuleto con los registros borrados, siempre y cuando la parte "visible" del browse no esté lleno de registros. Si tienes más registros de los que se ven en pantalla no tendrás problemas.
Mientras tanto tienes que hacer algunos trucos "sucios" para que se muestre medianamente decente.
No te olvides de comprobar Ctrl+AvPag y Ctrl+RePag que también funcionan "raro" cuando hay registros borrados.
Un saludo.
Al borrar :
(cAlias)->(DbDelete())
(cAlias)->(DbUnLock())
(cAlias)->(DbSkip())
oLbx:SetFocus()
If !(cAlias)->(Eof())
oLbx:Refresh()
Else
oLbx:GoUp()
oLbx:Refresh()
Endif
También puedes probar con :
oLbx:SetFocus()
oLbx:UpStable()
oLbx:Refresh()
O con :
Function RefrescaBrowse (oLbx)
/* ====================================================================================================
Hace un refresco correcto del browse que se le pasa.
Adaptado al tsbrowse 7.1
Parámetros:
oLbx . Listbox a procesar
Devuelve (nil)
----------------------------------------------------------------------------------------------------
Fecha creación:06/12/2005 19:44
Creado por:Angel
Última revisión:06/12/2005 19:45
Revisado por:Angel
====================================================================================================
*/
oLbx:SetFocus()
oLbx:ResetBarPos()
oLbx:UpStable()
oLbx:Reset()
oLbx:Refresh()
Return (nil)
De todas formas, el tsbrowse 7.1 se vuelve turuleto con los registros borrados, siempre y cuando la parte "visible" del browse no esté lleno de registros. Si tienes más registros de los que se ven en pantalla no tendrás problemas.
Mientras tanto tienes que hacer algunos trucos "sucios" para que se muestre medianamente decente.
No te olvides de comprobar Ctrl+AvPag y Ctrl+RePag que también funcionan "raro" cuando hay registros borrados.
Un saludo.
Angel Salom
http://www.visionwin.com
---------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.0
http://www.visionwin.com
---------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.0