TXBrowse desde Recursos

[AngelSalom]

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

[Antonio Linares]

Angel,

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

Code: Select all

  /*
   Paint cols data
   */

   ::lRefreshOnlyData := .f.

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

[AngelSalom]

En efecto, faltaba la línea

Code: Select all

   ::DispEnd( aInfo )

Muchas gracias.