Cambiar la imagen a un SpeedButton
 

Hola:

Tengo una aplicacioncilla en la que he puesto botones speedbutton transparentes y con una imagen dentro. Al no ver los bordes del icono, no hay ninguna diferencia del estado normal del boton a cuando se pulsa. Había pensado como solución cambiar la imagen en el evento OnMouseDown por la misma pero algo mas pequeña y restaurar la imagen original en OnMouseUp para lograr crear el efecto de pulsar.

Código Delphi [-]
bConsulta.Glyph.LoadFromFile('Imagenes\consultap.bmp');

Esto no acaba de funcionar. Parece que es como si no refrescase la pantalla, pero he probado a ponerle el Refresh y nada.

¿ Alguna idea de como lo puedo solucionar ?

Hola,

Deberías consultar la ayuda sobre la propiedad "Glyph", ya que esta admite una imagen BMP que en realidad contenga hasta cuatro trozos de un mismo tamaño que serán los utilizados en determinados "estados del botón" sin que tengas que codificar nada en absoluto. Conque busques en la ayuda sobre dicha propiedad y en "google" por "Glyph" verás que encontrarás imágenes que podrán servirte de ejemplo.

Buenas,
creo que tienes que ayudarte de la función LoadBitmap():
bConsulta.Glyph := LoadBitmap(...);

o algo así creo recordar.

LoadBitmap devuelve un Handle, se haría así:

Código Delphi [-]
bConsulta.Glyph.Handle:=LoadBitmap(HInstance, 'C:\Imagenes\consulta.bmp');

Creo que lo que le falla a pennylane al principio es que no escribía la ruta completa del archivo.

De todas formas, la opción que da dec es la más acertada (a mi parecer).


Salu2.

Si... Hice caso a Dec... ya se arreglo el problema... Muchas gracias a todos por las respuestas.