FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TxBrowse desde Recursos
Posts: 58
Joined: Mon Nov 06, 2006 06:56 AM
TxBrowse desde Recursos
Posted: Thu Mar 08, 2007 07:08 AM

Que tal, he estado viendo las respuestas sobre el txbrowse y de los demos que han puesto ninguno lo hace desde recursos, la pregunta se puede ?

Gracias.

Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: TxBrowse desde Recursos
Posted: Thu Mar 08, 2007 07:19 AM
Vital wrote:Que tal, he estado viendo las respuestas sobre el txbrowse y de los demos que han puesto ninguno lo hace desde recursos, la pregunta se puede ?

Gracias.


Afirmativo, claro que se puede.

   WITH OBJECT ( oBrw := TXBrowse():New( oDlg ) )
      :SetArray( aDetalle )
      :lVScroll         := .t.
      :lHScroll         := .f.
      :nFreeze          := 1
      :nColDividerStyle := LINESTYLE_INSET

      WITH OBJECT :aCols[1]
         :cHeader      := "Línea"
         :bStrData     := {|| Transform( aDetalle[ oBrw:nArrayAt ][01], "9,999" )}
      END
      WITH OBJECT :aCols[2]
         :cHeader      := "Estudio"
         :bStrData     := { || Transform( aDetalle[ oBrw:nArrayAt ][02], "@x" ) }
      END
      WITH OBJECT :aCols[3]
         :cHeader      := "Descripción"
         :bStrData     := { || Transform( aDetalle[ oBrw:nArrayAt ][03], "@x" ) }
      END

      :CreateFromResource( 403 )
   END


Espero te ayude este código
William, Morales

Saludos



méxico.sureste
Posts: 58
Joined: Mon Nov 06, 2006 06:56 AM
Gracias wmormar
Posted: Thu Mar 08, 2007 07:26 AM

Lo voy a probar

Posts: 58
Joined: Mon Nov 06, 2006 06:56 AM
TxBrowse desde Recursos
Posted: Thu Mar 08, 2007 05:03 PM

Que tal wmormar, ya lo estube probando, pero me marca un error, ADSGETRELKEYPOS, y ya lo estube buscando y vi varias soluciones y nada, tendras alguna solucion.

Estoy usando ADS de 5 Usuarios 7.1

Gracias.

Posts: 58
Joined: Mon Nov 06, 2006 06:56 AM
TxBrowse desde Recursos
Posted: Thu Mar 08, 2007 05:17 PM

Solucionado, Gracias.

Posts: 840
Joined: Thu Oct 13, 2005 07:05 PM
TxBrowse desde Recursos
Posted: Fri Mar 09, 2007 01:10 AM

REQUEST ADSGETRELKEYPOS

al principio del programa

Saludos

R.F.
Posts: 58
Joined: Mon Nov 06, 2006 06:56 AM
TxBrowse desde Recursos
Posted: Fri Mar 09, 2007 01:59 AM

Gracias Maestro.

Continue the discussion