Page 1 of 1

TXBrowse desde Recursos

Posted: Sat Aug 18, 2007 9:06 am
by 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

Posted: Sat Aug 18, 2007 9:30 am
by 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

Posted: Mon Aug 20, 2007 9:12 am
by AngelSalom
En efecto, faltaba la línea

Code: Select all

   ::DispEnd( aInfo )
Muchas gracias.