XBrowse y array unidimensional. SCROLL horizontal
Posted: Sun Dec 26, 2010 11:25 am
Hola a todos y FELICES FIESTAS antes de nada,
A ver... tengo un problema con un XBrowse de una array unidimensional; que por otro lado no sé si pretendo algo 'raro'.
Para probarlo basta coger el ejemplo que trae Fivewin en el fichero XBARRA1.prg y hacerlo trabajar con una array unidimensional y el SCROLL horizontal.
Concretamente este ejemplo 'revienta' cuando se usa este código:
.....
//@ 0,0 XBROWSE oBrw OF oWndDlg array aArray LINES CELL cols{ 1,2,3,4 } ; // cols and array are necesary
//Header "Num1", "date", "time", "extra" colsizes 40,80,80,40
@ 0,0 XBROWSE oBrw OF oWndDlg array aArray LINES CELL cols{ 1} ; // cols and array are necesary
Header "Num1" colsizes 40
.....
function AppendRow( oBrw )
//local aArray := { { 0, Date(), Time() , 1 } }
local aArray := { Date() }
.....
y se pretende utilizar el Scroll horizontal.
Saludos
A ver... tengo un problema con un XBrowse de una array unidimensional; que por otro lado no sé si pretendo algo 'raro'.
Para probarlo basta coger el ejemplo que trae Fivewin en el fichero XBARRA1.prg y hacerlo trabajar con una array unidimensional y el SCROLL horizontal.
Concretamente este ejemplo 'revienta' cuando se usa este código:
.....
//@ 0,0 XBROWSE oBrw OF oWndDlg array aArray LINES CELL cols{ 1,2,3,4 } ; // cols and array are necesary
//Header "Num1", "date", "time", "extra" colsizes 40,80,80,40
@ 0,0 XBROWSE oBrw OF oWndDlg array aArray LINES CELL cols{ 1} ; // cols and array are necesary
Header "Num1" colsizes 40
.....
function AppendRow( oBrw )
//local aArray := { { 0, Date(), Time() , 1 } }
local aArray := { Date() }
.....
y se pretende utilizar el Scroll horizontal.
Saludos