Modificar BitBtn1.Glyph en ejecucion

[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.