Cambiar cursor en tiempo de ejecucion en un TsBrowse

[JoseGS]

Hola amigos:

Quisiera saber la forma en la que puedo cambiar el cursor utilizado en tiempo de ejecucion:

Explico:

- Tengo un TsBrowse al cual le he definido el cursor del dedo...
- Ese Browse, lo inhabilito mediante oBrw:DISABLE() en algunas ocaciones para que el usuario no pueda cambiar el puntero de la base de datos. En _, me gustaria cambiar el cursor a un simbolo de NO para que el usuario sepa que en ese momento el browse esta inhabilitado...

Alguna idea ?

Gracias

[mmercado]

Hola José:

- Tengo un TsBrowse al cual le he definido el cursor del dedo...
- Ese Browse, lo inhabilito mediante oBrw:DISABLE() en algunas ocaciones para que el usuario no pueda cambiar el puntero de la base de datos. En _, me gustaria cambiar el cursor a un simbolo de NO para que el usuario sepa que en ese momento el browse esta inhabilitado...

Según mis pruebas, cuando un control está inhabilitado (oBrw:DISABLE()) no detecta el paso del mouse por lo que no mostrará ningún cambio de cursor.

Pruébalo con lo siguiente:

lStop := .t.
oBrw:OnMouseMove := {||If( lStop, CursorStop(), CursorArrow() ) }

Un abrazo.

[JoseGS]

Gracias Manuel

Hare la prueba....

Como estuvo ese cumpleños ?