Xailer & OZ Software

Me han saltado algunos errores al trabajar con Browses que me funcionan
correctamente en la 1.2a, y os describo que está ocurriendo...
nSetFocus := Ascan( ::oBrowse1:aCols, {|x| x:nSort = bsASCENDING } )
MSGINFO( nSetFocus ) //debuelve 2, que es donde está la marca
WITH OBJECT ::oDbfDataSet1
:SaveState( .T. )
:OrdSetFocus(3)
.... Hago mis operaciones
:RestoreState( .T. )
//En la 1.3 debo "forzar" a reescribir la marca en el Header
::oBrowse1:aCols[nSetFocus]:nSort := bsASCENDING
:OrdSetFocus(nSetFocus)
END
MSGINFO( Ascan( ::oBrowse1:aCols, {|x| x:nSort = bsASCENDING } ) )
//aquí ha desaparecido la marca si no fuerzo a reescribirla.
Con la 1.2a, que es la que están utilizando mis clientes, funciona sin tener
que forzar a reescribir ¿?¿?
Gracias.
Un Saludo,
Xevi.

Xevi,
No es un error, simplemente debes de poner el nSort después del OrdSetfocus.
Se ha modificado OrdSetFocus para que automaticamente quite la marca de
nSort por coherencia.
Un saludo,
"Xevi" <xevicomas@gmail.com> escribió en el mensaje
news:[email=45fa4d08@news.xailer.com...]45fa4d08@news.xailer.com...[/email]
> Me han saltado algunos errores al trabajar con Browses que me funcionan
> correctamente en la 1.2a, y os describo que está ocurriendo...
>
> nSetFocus := Ascan( ::oBrowse1:aCols, {|x| x:nSort = bsASCENDING } )
>
> MSGINFO( nSetFocus ) //debuelve 2, que es donde está la marca
> WITH OBJECT ::oDbfDataSet1
> :SaveState( .T. )
> :OrdSetFocus(3)
> ... Hago mis operaciones
> :RestoreState( .T. )
> //En la 1.3 debo "forzar" a reescribir la marca en el Header
> ::oBrowse1:aCols[nSetFocus]:nSort := bsASCENDING
> :OrdSetFocus(nSetFocus)
> END
> MSGINFO( Ascan( ::oBrowse1:aCols, {|x| x:nSort = bsASCENDING } ) )
> //aquí ha desaparecido la marca si no fuerzo a reescribirla.
>
> Con la 1.2a, que es la que están utilizando mis clientes, funciona sin
> tener que forzar a reescribir ¿?¿?
>
> Gracias.
>
> Un Saludo,
> Xevi.
>