ScrollVertical TDbfBrowse

[Xevi]

Cuando a un DbfBrowse le asignamos una Dbf, funciona perfectamente
METHOD Browse1Create( oSender ) CLASS TFrmModelos
oSender:SetDbf( "miDbf" )
RETURN Nil
Ahora bien, si a esta Browse le asociamos un í­ndice, en este caso Ntx..
METHOD Browse1Create( oSender ) CLASS TFrmModelos
USE (miDbf)
INDEX ON Field->MODELO TO (miIndice)
SET INDEX TO (miIndice)
oSender:SetDbf( "miDbf" )
RETURN Nil
El Scroll Vertical, queriendo desplazar el Browse por el cursor del ScrollVertical, no funciona, sólo mueve un registro, y luego ya no desplaza mas registros. Sin embargo, moviendo por las flechas del ScrollVertical si funciona.
Lo he probado en unas cuantas Dbf, y con í­ndices distintos... siempre el mismo resultado.
Utilizando el TDBBrowse con Datasets, perfecto. El fallo sólo lo tiene el DbfBrowse.
Un Saludo,
Xevi.
--

[ignacio]

Xevi,
Este problema ya se me ha comentado en otras ocasiones, y me temo que la solución no es fácil, me explico. El funcionamiento del arrastre del ascensor de la barra de scroll se puede hacer de dos maneras:
1) Utilizando la función OrdKeyGoto()
2) Realizando un Skip desde la posición actual (KeyNo()) y a la posición lógica donde se quiere ir
Xailer intenta usar la primer opción por velocidad, y cuando el recno() no varí­a al usar la opción 1, entonces intenta realizar la 2.
Los problemas que me he encontrado con los distintos RDD de xharbour que hoy por hoy no se si están solucionados es que las funciones OrdKeyGoto y OrdKeyNo no están implementadas en algunos RDD y por lo tanto es imposible hacer que funcione.
Lo mejor es que mandes un ejemplo con DBF incluida para poder ver si el problema es nuestro o sigue siendo de xHarbour.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:[email=433dbaad@ozsrvnegro.ozlan.local...]433dbaad@ozsrvnegro.ozlan.local...[/email]
Cuando a un DbfBrowse le asignamos una Dbf, funciona perfectamente
METHOD Browse1Create( oSender ) CLASS TFrmModelos
oSender:SetDbf( "miDbf" )
RETURN Nil
Ahora bien, si a esta Browse le asociamos un í­ndice, en este caso Ntx..
METHOD Browse1Create( oSender ) CLASS TFrmModelos
USE (miDbf)
INDEX ON Field->MODELO TO (miIndice)
SET INDEX TO (miIndice)
oSender:SetDbf( "miDbf" )
RETURN Nil
El Scroll Vertical, queriendo desplazar el Browse por el cursor del ScrollVertical, no funciona, sólo mueve un registro, y luego ya no desplaza mas registros. Sin embargo, moviendo por las flechas del ScrollVertical si funciona.
Lo he probado en unas cuantas Dbf, y con í­ndices distintos... siempre el mismo resultado.
Utilizando el TDBBrowse con Datasets, perfecto. El fallo sólo lo tiene el DbfBrowse.
Un Saludo,
Xevi.
--

[Xevi]

Ignacio,
En mi opinión, creo que el error es de DbfBrowse, pues si utilizamos un DataSet y un DBBrowse, con el mismo RDD NTX, funciona correctamente.
Ahora bien, lo he probado con el Sample de Xailer... XDBFTest... For Nostalgics...
En la lí­nea 31 he añadido la construcción de un í­ndice y su uso...
INDEX ON Field->FIRST TO ..FIRST
SET INDEX TO ..FIRST
Y ya tenemos el problema del "ascensor" del Scrollvertical.
Por lo que no hace falta que te adjunte un ejemplo, con añadir esas lí­neas en el Sample XDbfTest de Xailer, lo puedes comprobar perfectamente.
Gracias.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:4340f157$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,
Este problema ya se me ha comentado en otras ocasiones, y me temo que la solución no es fácil, me explico. El funcionamiento del arrastre del ascensor de la barra de scroll se puede hacer de dos maneras:
1) Utilizando la función OrdKeyGoto()
2) Realizando un Skip desde la posición actual (KeyNo()) y a la posición lógica donde se quiere ir
Xailer intenta usar la primer opción por velocidad, y cuando el recno() no varí­a al usar la opción 1, entonces intenta realizar la 2.
Los problemas que me he encontrado con los distintos RDD de xharbour que hoy por hoy no se si están solucionados es que las funciones OrdKeyGoto y OrdKeyNo no están implementadas en algunos RDD y por lo tanto es imposible hacer que funcione.
Lo mejor es que mandes un ejemplo con DBF incluida para poder ver si el problema es nuestro o sigue siendo de xHarbour.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:[email=433dbaad@ozsrvnegro.ozlan.local...]433dbaad@ozsrvnegro.ozlan.local...[/email]
Cuando a un DbfBrowse le asignamos una Dbf, funciona perfectamente
METHOD Browse1Create( oSender ) CLASS TFrmModelos
oSender:SetDbf( "miDbf" )
RETURN Nil
Ahora bien, si a esta Browse le asociamos un í­ndice, en este caso Ntx..
METHOD Browse1Create( oSender ) CLASS TFrmModelos
USE (miDbf)
INDEX ON Field->MODELO TO (miIndice)
SET INDEX TO (miIndice)
oSender:SetDbf( "miDbf" )
RETURN Nil
El Scroll Vertical, queriendo desplazar el Browse por el cursor del ScrollVertical, no funciona, sólo mueve un registro, y luego ya no desplaza mas registros. Sin embargo, moviendo por las flechas del ScrollVertical si funciona.
Lo he probado en unas cuantas Dbf, y con í­ndices distintos... siempre el mismo resultado.
Utilizando el TDBBrowse con Datasets, perfecto. El fallo sólo lo tiene el DbfBrowse.
Un Saludo,
Xevi.
--

[ignacio]

Xevi,
Tení­as razón. Ya está arreglado. Fallaba la comparación que decidí­a intentar por el método segundo, pues efectivamente el RDD NTX no soporta OrdKeyGoto().
Gracias por todo y un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:[email=4340f9a6@ozsrvnegro.ozlan.local...]4340f9a6@ozsrvnegro.ozlan.local...[/email]
Ignacio,
En mi opinión, creo que el error es de DbfBrowse, pues si utilizamos un DataSet y un DBBrowse, con el mismo RDD NTX, funciona correctamente.
Ahora bien, lo he probado con el Sample de Xailer... XDBFTest... For Nostalgics...
En la lí­nea 31 he añadido la construcción de un í­ndice y su uso...
INDEX ON Field->FIRST TO ..FIRST
SET INDEX TO ..FIRST
Y ya tenemos el problema del "ascensor" del Scrollvertical.
Por lo que no hace falta que te adjunte un ejemplo, con añadir esas lí­neas en el Sample XDbfTest de Xailer, lo puedes comprobar perfectamente.
Gracias.
Un Saludo,
Xevi.
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje news:4340f157$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
Xevi,
Este problema ya se me ha comentado en otras ocasiones, y me temo que la solución no es fácil, me explico. El funcionamiento del arrastre del ascensor de la barra de scroll se puede hacer de dos maneras:
1) Utilizando la función OrdKeyGoto()
2) Realizando un Skip desde la posición actual (KeyNo()) y a la posición lógica donde se quiere ir
Xailer intenta usar la primer opción por velocidad, y cuando el recno() no varí­a al usar la opción 1, entonces intenta realizar la 2.
Los problemas que me he encontrado con los distintos RDD de xharbour que hoy por hoy no se si están solucionados es que las funciones OrdKeyGoto y OrdKeyNo no están implementadas en algunos RDD y por lo tanto es imposible hacer que funcione.
Lo mejor es que mandes un ejemplo con DBF incluida para poder ver si el problema es nuestro o sigue siendo de xHarbour.
Un saludo,
"Xevi" <xevicomas@terra.es> escribió en el mensaje news:[email=433dbaad@ozsrvnegro.ozlan.local...]433dbaad@ozsrvnegro.ozlan.local...[/email]
Cuando a un DbfBrowse le asignamos una Dbf, funciona perfectamente
METHOD Browse1Create( oSender ) CLASS TFrmModelos
oSender:SetDbf( "miDbf" )
RETURN Nil
Ahora bien, si a esta Browse le asociamos un í­ndice, en este caso Ntx..
METHOD Browse1Create( oSender ) CLASS TFrmModelos
USE (miDbf)
INDEX ON Field->MODELO TO (miIndice)
SET INDEX TO (miIndice)
oSender:SetDbf( "miDbf" )
RETURN Nil
El Scroll Vertical, queriendo desplazar el Browse por el cursor del ScrollVertical, no funciona, sólo mueve un registro, y luego ya no desplaza mas registros. Sin embargo, moviendo por las flechas del ScrollVertical si funciona.
Lo he probado en unas cuantas Dbf, y con í­ndices distintos... siempre el mismo resultado.
Utilizando el TDBBrowse con Datasets, perfecto. El fallo sólo lo tiene el DbfBrowse.
Un Saludo,
Xevi.
--