![]() |
|||||||||
|
|
|||||||||
Rueda del ratónLibrería para modificar el funcionamiento de la rueda del ratón en formularios simples de Access. Sirve para que, en vez de desplazarse entre los registros del formulario al usar la rueda del ratón, nos movemos verticalmente por el formulario, simulando el mismo efecto de la rueda que en otras aplicaciones. En el archivo se encuentra también una base de datos de ejemplo, para ver el funcionamiento de la librería. GarantíasEste archivo se entrega "tal cual", sin garantías de ninguna clase: guarda tu trabajo y haz copias de seguridad antes de probar la librería. A mí me ha funcionado, pero nunca se sabe. Uso
Código VBA
Private wheel As MouseWheelVScroll.CMouseWheel
Private Sub Form_Load() Set wheel = New MouseWheelVScroll.CMouseWheel Set wheel.Form = Me wheel.SubClassHookForm End Sub Private Sub Form_Unload(Cancel As Integer) wheel.SubClassUnHookForm Set wheel.Form = Nothing Set wheel = Nothing End Sub NotasLa librería no funciona con los controles que haya en un formulario, sólo con el propio formulario. Tal vez en un futuro consiga hacerla funcionar también con los controles, pero no prometo nada. En el archivo comprimido, hay una base de datos en versión Access 2000, con un ejemplo simple de forma de uso de la librería en un formulario simple. También se han agregado 2 archivos .bat, RegistrarDll.bat y DesRegistrarDll.bat, que sirven para registrar y desregistrar la librería. Nota para usuarios de Windows Vista: Un usuario con derechos de administrador no puede registrar directamente la librería, debido al control de seguridad que realiza este sistema operativo. Para poder registrar la librería, se debe usar el archivo RegistrarDll.bat de una forma "especial": pulsa con el botón derecho del ratón sobre este archivo y selecciona la opción "Ejecutar como Administrador". Revisiones
Descargas |
|||||||||
|
2008 Patxi Sanz Libro de visitas |