Browse... Desaparece marca nSort en 1.3a

[Xevi]

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.

[ignacio]

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.
>