FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Dos preguntas sobre TxBrowse
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM
Dos preguntas sobre TxBrowse
Posted: Sun Nov 18, 2007 06:18 PM
1.- Quiero visualizar y editar el contenido de un DBF de aprox. 5000 registros y 20 campos (tamaño total: aprox.2 Mb) Para acelerar la respuesta, he pensado en volcarla a un array y editarlo mediante TxBrowse() en modo Array. Funciona perfectamente. Ahora bien, me pregunto si hay algún límite a este sistema: ¿Funcionará igual de bien con una Dbf de 200 Mb (aparte, obviamente, del mayor tiempo de carga)? ¿Está limitada por la RAM disponible o hará swaping a disco?¿Alguien tiene experiencia con esta forma de trabajar?

2.- Me gustaría poder poner unas ventanas o rectángulos fijos sobre determinadas casillas del TxBrowse 8y que sigan al Browse al hacer scroll en él. Algo más o menos así:
.....
oBrw := TxBrowse():New()
CrearBarra(oBrw, nRow, nCol)
.... etc

Function CrearBarra(oBrw, nR, nC)
Local oWnd
Define Window oWnd From nR, nC To nR+20, nC+50 Pixel Of oBrw Color CLR_WHITE, CLR_BLUE
Activate Window oWnd
Return Nil


Quisiera que la barra pueda dimensionarse arrastrando de sus bordes. Por eso utilizo un TWindow, aunque quizás TWindow no sea la forma más adecuada. ¿Alguna sugerencia?
Gracias
Rafael
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Dos preguntas sobre TxBrowse
Posted: Sun Nov 18, 2007 07:03 PM

Rafael,

Porque no lees directamente desde la DBF ? Además si el contenido de la DBF cambia, tu array no tendrá los cambios.

En cuanto al pintado, puedes modificar el método de pintado de la clase columna para que dibuje el marco que necesitas

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion