Página 1 de 1

scrool tdbbrowse

Publicado: Mié Ene 10, 2007 2:12 pm
por PILO
Hola cual es el evento que tengo que lanzar cuando muevo para arriba con el
escrool de la derecha
o cuando muevo la ruleta del ratón

scrool tdbbrowse

Publicado: Mié Ene 10, 2007 4:08 pm
por zeasoftware
es automatico, segun lo que he usado.
Saludos.
Ramón Zea
"PILO" <srmpilo@hotmail.com> escribió en el mensaje
news:45a4e63d$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Hola cual es el evento que tengo que lanzar cuando muevo para arriba con
> el escrool de la derecha
> o cuando muevo la ruleta del ratón
>
>
>

scrool tdbbrowse

Publicado: Mié Ene 10, 2007 8:16 pm
por PILO
Lo que quiero es cuando cambie de un registro a otro el browse, lanzar un
evento
para hacer un scope en otra base de datos
con la flechas lo hago, con el click tambien pro cuando se muevo con el
scrool derecho o con scroll de raton no
me va, sabes como lo puedo capturar
"ZeaSoftware" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=45a50168@news.xailer.com...]45a50168@news.xailer.com...[/email]
> es automatico, segun lo que he usado.
>
> Saludos.
> Ramón Zea
>
> "PILO" <srmpilo@hotmail.com> escribió en el mensaje
> news:45a4e63d$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Hola cual es el evento que tengo que lanzar cuando muevo para arriba con
>> el escrool de la derecha
>> o cuando muevo la ruleta del ratón
>>
>>
>>
>
>

scrool tdbbrowse

Publicado: Mié Ene 10, 2007 8:25 pm
por ignacio
Pilo,
Consulte en la documentación el evento TBrowse:OnChange
Saludos
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"PILO" <srmpilo@hotmail.com> escribió en el mensaje
news:45a53b8a$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Lo que quiero es cuando cambie de un registro a otro el browse, lanzar un
> evento
> para hacer un scope en otra base de datos
> con la flechas lo hago, con el click tambien pro cuando se muevo con el
> scrool derecho o con scroll de raton no
> me va, sabes como lo puedo capturar
>
> "ZeaSoftware" <zeasoftware@hotmail.com> escribió en el mensaje
> news:[email=45a50168@news.xailer.com...]45a50168@news.xailer.com...[/email]
>> es automatico, segun lo que he usado.
>>
>> Saludos.
>> Ramón Zea
>>
>> "PILO" <srmpilo@hotmail.com> escribió en el mensaje
>> news:45a4e63d$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Hola cual es el evento que tengo que lanzar cuando muevo para arriba con
>>> el escrool de la derecha
>>> o cuando muevo la ruleta del ratón
>>>
>>>
>>>
>>
>>
>
>

scrool tdbbrowse

Publicado: Mié Ene 10, 2007 10:43 pm
por zeasoftware
Te dejo unos ejemplos que uso:
METHOD Browse1Change( oSender, lBookMarkChanged ) CLASS tFormBancos
::oDataSet2:SetScope( ::oDataSet1:Banco ) //== ::oDataSet1:Banco,, .t. )
::oDataSet2:GoTop()
::oDBBrowse2:refresh(.t.)
::DBBrowse2Change( oSender, lBookMarkChanged )
::oLabel3:cText := ::oDataSet1:Banco
RETURN Nil
//---------------------------------------------------------- --------------------
METHOD DBBrowse2Change( oSender, lBookMarkChanged ) CLASS tFormBancos
::oDataSet3:SetScope( ::oDataSet2:Banco + ::oDataSet2:NumCuenta )
::oDataSet3:GoTop()
::oDBBrowse3:refresh(.t.)
::oLabel4:cText := ::oDataSet2:NumCuenta
RETURN Nil
//---------------------------------------------------------- --------------------

scrool tdbbrowse

Publicado: Jue Ene 11, 2007 1:30 pm
por PILO
Gracias a los dos me daba un error con el metodo Onchage y crei que no era
ese
"ZeaSoftware" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=45a55deb@news.xailer.com...]45a55deb@news.xailer.com...[/email]
> Te dejo unos ejemplos que uso:
>
> METHOD Browse1Change( oSender, lBookMarkChanged ) CLASS tFormBancos
> ::oDataSet2:SetScope( ::oDataSet1:Banco ) //== ::oDataSet1:Banco,, .t. )
> ::oDataSet2:GoTop()
> ::oDBBrowse2:refresh(.t.)
>
> ::DBBrowse2Change( oSender, lBookMarkChanged )
>
> ::oLabel3:cText := ::oDataSet1:Banco
>
> RETURN Nil
>
> //---------------------------------------------------------- --------------------
>
> METHOD DBBrowse2Change( oSender, lBookMarkChanged ) CLASS tFormBancos
> ::oDataSet3:SetScope( ::oDataSet2:Banco + ::oDataSet2:NumCuenta )
> ::oDataSet3:GoTop()
> ::oDBBrowse3:refresh(.t.)
>
> ::oLabel4:cText := ::oDataSet2:NumCuenta
>
> RETURN Nil
>
> //---------------------------------------------------------- --------------------
>
>