DESCRIPCION:

Ejemplo de como montar un sencillo sistema de ayudas para cada control que se iran mostrando,

mediante el evento Al Mover el Mouse, sobre una ventana emergente.

REVISADO en Noviembre 2006 para permitir su uso sobre subformularios.

REVISADO en Diciembre 2006 para cambiar el sistema se posicionamiento de la ayuda. Ahora se situa

En la posición del cursor.

 

EXPLICACION:

Este es un ejemplo de como se puede aplicar a un formulario, de forma facil un sistema de ayudas

independientes para cada control.

Parte de la misma base que otro ejemplo mio que muestra las ayudas en una etiqueta. A partir de ahí,

dos buenos amigos y compañeros del foro (www.mvp-access.com/foro): Emilio (Emilio Sancha) y Mihura

(Jesus Mansilla), a los que doy las gracias desde aquí, me enredaron y me orientaron sobre la

posibilidad de hacerlo en forma de ventanas emergentes y ... este es el resultado.

 

El codigo utlizado está condicionado por la inexistencia, en las versiones anteriores a Access XP

de las propiedades WindowLeft y WindowTop, lo que obliga a sustituir su uso con el empleo de Apis

que engordan el codigo. A cambio, así puede ser usado por un mayor número de gente.

 

Para aplicar este sistema a cualquier formulario solo habrá que:

1.- Copiar los modulos y el formulario frmMuestraAyuda  en nuestra mdb.

2.- Escribir en la propiedad "Información Adicional" de cada control el texto de ayuda que se desea

    mostrar para el mismo. Para esto podemos ayudarnos con la función Zoom (May+F2)

3.- En el evento "Al Abrir" del formulario llamaremos a la función AsignaEvento, pasandole como

    parámetro Me (es decir, la referencia al formulario actual): AsignaEvento(Me)

4.- Asignar valor True a la variable mostrarAyuda en el evento Al Abrir del formulario:

    mostrarAyuda = True. O, en se lugar, si queremos poder activar y desactivar dichas ayudas, crear

    un boton de comando que vaya asignando valor alternativamente a dicha variable, de la forma en

    que lo hace el existente en el ejemplo

 

A partir de ahí todos los controles en los que escribamos algo en la propiedad Información adicional,

tendrán su propio texto de ayuda que aparecerá simulando un PopUp o ventana emergente. Aquellos

controles a los que se deje en blanco la propiedad Información Adicional no tendrán texto de ayuda.

 

Existen dos versiones de este ejemplo, 1 para AccessXP o superior y otra para Access 2000.

 

                                                   Marciano Almohalla, Enero de 2006

                                                                       Noviembre 2006