Modificar BitBtn1.Glyph en ejecucion

[fliper]

A Quien Lo lea.

Mi pregunta es si durante la ejecucion de un programa al cambiar una variable boleean a true se puede cambiar la imagen del bitbutton, y de que manera por que por mas q intento no doy con la tecla.

La imagen seria bmp y de archivo.

Gracias.

[dec]

Hola,

¿Algo así podría valerte?

Código Delphi [-]
BitBtn1.Glyph.LoadFromFile('C:\archivo.bmp');

[fliper]

Probado y Perfecto, Muchisimas Gracias!!

[fliper]

Wenas de Nuevo!

Puede ser que la ruta del proyecto se obtenga automaticamente a traves de una funcion y solo se concatene el nombre de la imagen por si mudo el proyecto, si no no me carga la imagen al no coincidir la ruta..(al mudarse)

GRacias!

[roman]

La ruta del proyecto la puedes obtener con

ExtractFilePath(Application.ExeName);

// Saludos

[Patricio]

si el proyecto es un sistema en red donde se acceden desde varias pc, la opcion
ExtractFilePath(Application.ExeName);
funciona bien?

yo en un momento usaba algo asi
BitBtn1.Glyph.LoadFromFile('C:\archivo.bmp');
pero al acceder desde los puestos me daba el error obvio de que
no encontraba el archivo.
Ahora cree un archivo de recursos con las imagenes y las cargo
btn1.glyph.Handle := loadBitmap(hInstance, 'casabmp');
Saludos

[anubis]

Hola, estoy intentando crear una ruta sobre un boton, tal y como explicais anteriormente, pero tengo bastantes botones

Código Delphi [-]
fentrada.lbl:= Tbutton(fentrada.FindComponent('b'+fentrada.lbl.caption));
   fentrada.lbl.glyph.loadfromfile('c:\programa\campana.bmp');

los busco asi, pero mi boton es de tipo xibutton, que permite un glyph como los bitbtn1, pero no me deja hacerlo con ese metodo, tengo que poner el nombre del componente para que me lo permita, es decir, si pongo
b101.glyph.loadfromfile si me lo permite, hay forma de poder sustituir por ejemplo, el b101 (nombre del componente xibutton) por el que se haya pulsado y poder usar los glyph?,

gracias, imagino que seria complicado.

[anubis]

ya lo solucione, gracias. Solo tenia que crear la variable lbl2 como xibutton y cambiar el tbutton por txibutton.