Dos preguntas sobre TxBrowse

[Rafael Clemente]

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í:

Code: Select all  Expand view  RUN

.....
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

[Antonio Linares]

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