Fórum ImageList com SpeedButton #255542
22/10/2004
0
Fiz um programa com alguns botões padrão nas telas. Gostaria de usas 2 imagelist: uma com imagens ativas e a outra com imagens inativas. Se eu usar o tollbar agora vai dar maior trabalho devido a codificação em cada botão. Trabalho com form pai e filho.
As images que tenho é do padrão XP. Quando o botão fica enabled = false a imagem desaparece.
Valeu a força !!!
JR.
Jrjoliv2003
Curtir tópico
+ 0Posts
22/10/2004
Lucianols
procedure HabDesBotao(Sender: TSpeedButton; Index: Integer);
var
Img: TImageList;
begin
if Sender.Enabled then
Img := ImgNormal
else
Img := ImgDesabilitado;
with Img do
begin
Sender.Glyph := nil;
GetBitmap(Index, Sender.Glyph);
end;
end;
Gostei + 0
22/10/2004
Jrjoliv2003
Mas alguém sabe como fazer para que os Glyphs XP não desapareça quando o botão estiver speedbutton.enabled:=true;
Valeu a força!!!
JR.
Gostei + 0
24/10/2004
Jrjoliv2003
OBS: O código do imagelist que o lucianols passou eu estou testando.
Valeu a força!!
JR.
Gostei + 0
25/10/2004
Jrjoliv2003
Quando coloco o glyph no botão se ativar enabled = false fica o glyph com a cor editada, se enabled = true fica o glyph com a cor original.
Valeu!!!
JR.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)