topic-7895

Board index FiveWin para Harbour/xHarbour TXBrowse desde Recursos

Posts: 728

Joined: Fri Oct 07, 2005 07:38 AM

TXBrowse desde Recursos
Posted: Sat Aug 18, 2007 09:06 AM

Buenas gente!! estoy cambiando de TsBrowse a TxBrowse y hasta ahora todo bien, solo una consulta. Cuando creo un browse desde recursos, si el DBF que muestra no tiene registros no presenta el browse (es decir, ni siquiera las cabeceras de las columnas), en cambio si tiene cualquier registro ya lo muestra correctamente.
En cambio creando el mismo browse desde código esto no ocurre.

¿Alguna sugerencia?

Gracias

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

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

TXBrowse desde Recursos
Posted: Sat Aug 18, 2007 09:30 AM

Angel,

Comprueba que tienes este código en el método Paint() de la Clase TXBrowse:

Code: Select all Collapse

  /*
   Paint cols data
   */

   ::lRefreshOnlyData := .f.

   if ::nLen == 0
      ::EraseData( nFirstRow  )
      ::DispEnd( aInfo )
      return nil
   endif

regards, saludos

Antonio Linares
www.fivetechsoft.com

AngelSalom

Posts: 728

Joined: Fri Oct 07, 2005 07:38 AM

TXBrowse desde Recursos
Posted: Mon Aug 20, 2007 09:12 AM

En efecto, faltaba la línea

Code: Select all Collapse

   ::DispEnd( aInfo )

Muchas gracias.

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

FiveTech Support Forums

Continue the discussion