Botones como los del Office sin escribir nada de código (bueno, algo sí)

 

Esta forma de presentar botones de barras de herramientas (o lo que se te ocurra) estilo los del Office, Visual5, FrontPage97, IExplorer… es mucho más fácil que con ejemplos anteriores, pues no se necesita escribir prácticamente nada de código para crearlos.

La creación de estos botones se realiza mediante cualquier programa de retoque de imágenes y no se necesita nada más.

Necesitas pillar de algún sitio los botones que quieras meter. Puedes tenerlos ya guardados en formato BMP, como los típicos de las barras de herramientas, por ejemplo, pero yo me decanto más por otra opción, mucho más divertida. Abre cualquier programa de Microsoft que tenga ese tipo de botones y mueve el ratón por uno de ellos hasta que aparezca iluminado o resaltado. Sin mover el ratón pulsa en el Impr.Pant para capturar toda la pantalla.

De esta forma tienes en el Portapapeles las dos posiciones del botón, el normal (no resaltado) y el resaltado.

Abre el programa de retoque fotográfico (valen casi todos) y pega el contenido del Portapapeles en el.

Recorta todos los botones que quieras utilizar y sepáralos para poder trabajar con comodidad.

Intenta buscar y coger el botón que tenías resaltado y recórtalo a pelo, ahora ya tienes un botón listo, el resaltado, ya te lo puedes guardar y hacer lo mismo con los otros, aunque estos no estén resaltados.

Con toda la colección de iconos (o imágenes) bien recortadas y limpiadas ya se pueden insertar en el Visual, coge para ello una Image o una ImageBox, aunque yo me quedo con la primera por no tener que quitar el borde que tiene.

Después de tener en el Visual una imagen en cada caja, la tarea que viene a continuación es más delicada, atención:

Con la imagen que tenías recortada y resaltada tienes que conseguir eliminar de su interior el icono o dibujo que la compone, para ello utiliza las herramientas de borrado, respetando en todo caso el color de fondo, el típico gris.

Si ya tienes la imagen lista, es decir, que ya le has eliminado de su interior el dibujillo, felicidades, ya tienes una plantilla lista para poderla utilizar con las demás imágenes (esta plantilla os la regalo con un archivo ZIP que incluyo, en formato BMP).

Fíjate que tienes: en el Visual cajas independientes con los iconos simples, es decir sin bordes ni resaltados, ahora si lo has hecho todo bien, tienes una plantilla que deberá "albergar" en su interior cada uno de los iconos o dibujillos para que de esta forma tenga la apariencia de resaltado, ¿ lo pillas ?, ¡ cuando se le coge el tranquillo es súper fácil !

Si mi buen amigo Guille me hace el favor, tendréis un archivo ZIP que contiene un ejemplo completo, con el código fuente para que repaséis todo esto tranquilamente con el Visual4 en casa.

Después de tener todos los gráficos (los resaltados y los normales) en el Visual, en diferentes cajas de imagen, tenéis que pillar todos los que están resaltados y meterles la propiedad de VISIBLE = FALSE para que no aparezcan en pantalla hasta después de situar el ratón encima de los normales.

La idea es esta, y no hay otra: al mover el ratón por encima de los botones normales tienen que aparecer, encima de estos (VISIBLE = TRUE) los resaltados, y, como no, al pulsar (CLICK) con el ratón efectuar la operación correspondiente.

Seguimos con la tralla… en cada botón no resaltado, metemos en el procedimiento MOUSE MOVE el código siguiente: IMAGE_la que sea.VISIBLE = TRUE. Tened cuidado de recordar y escribir bien el número de la IMAGE que preceda, para que no es os aparezcan los botones cambiados de sitio.

Repetimos el código para cada botón normal.

Ahora en cada botón resaltado tenéis que meter en el procedimiento CLICK la operación que queráis que efectúe, bueno, lo que es lo mismo, el código.

Para terminar situar los botones resaltados sobre los que no lo están (esto es delicado, y os recomiendo que no tengáis aquello de ALIGN TO GRID en TRUE para poder moveros fácilmente) finalmente, buscad en el FORM el procedimiento MOUSE MOVE y escribid del código: IMAGE_la que sea.VISIBLE = FALSE, y así sucesivamente hasta dejar invisibles las imágenes resaltadas.

¡ F5, y a disfrutar ! (-menos mal que ya ha terminado este pesado-)

Dejo rienda suelta a vuestra imaginación para que os rompáis el coco pensando como se podrían hacer botones pero inactivos, es decir, aquellos que están visibles pero con un difuminado gris… es muy fácil ¿ no …?.

 

Jordi Fosch

e-mail: [email protected]

http://www.arrakis.es/%7ejfosch


Para bajarte el listado de ejemplo, pulsa este link (ofiBotones.zip 69.6KB)