FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Problemas con tsbrowse 1.7
Posts: 195
Joined: Sat Oct 22, 2005 01:17 PM
Problemas con tsbrowse 1.7
Posted: Wed Jan 04, 2006 09:58 PM

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

Oscar

:(

Saludos

Oscar

Fwh 23.10, bcc55

Posts: 14
Joined: Sun Nov 27, 2005 02:49 AM
Re: Problemas con tsbrowse 1.7
Posted: Wed Jan 04, 2006 10:44 PM

Oscar.

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

Posts: 195
Joined: Sat Oct 22, 2005 01:17 PM
Problemas con tsbrowse 1.7
Posted: Thu Jan 05, 2006 12:10 AM

Gracias Francisco

Por fa si tienes alguna novedad al respecto agradecer铆a tu ayuda

Saludos

Oscar :arrow:

Saludos

Oscar

Fwh 23.10, bcc55

Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Problemas con tsbrowse 1.7
Posted: Thu Jan 05, 2006 03:24 PM

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.

Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4

Continue the discussion