Imagem do speedbuttom em runtime
Preciso colocar um imagem em um speedbuton em modo de execurção, alguem sabe como fazer.. e tambem preciso destruir os componentes que criei tipo Panel, edit, label e speedbuton
Dpinho
Curtidas 0
Respostas
Biohazard
01/04/2005
1)SpeedButton:
coloque um ImageList, adicione qualquer imagem, depois, no método OnShow do Form, coloque o seguinte:
ImageList1 := GetBitmap(SpeedButton1,0);
2)Para os outro componentes vc faz o seguinte, por exemplo, pode colocar um botão com o Captio ´Destruir´, e no evento OnClick:
Panel1.Free;
Edit1.Free ... e assim por diante, qualquer coisa mande-me um email, flw???
coloque um ImageList, adicione qualquer imagem, depois, no método OnShow do Form, coloque o seguinte:
ImageList1 := GetBitmap(SpeedButton1,0);
2)Para os outro componentes vc faz o seguinte, por exemplo, pode colocar um botão com o Captio ´Destruir´, e no evento OnClick:
Panel1.Free;
Edit1.Free ... e assim por diante, qualquer coisa mande-me um email, flw???
GOSTEI 0
Raserafim
01/04/2005
vou lhe mostrar 3 formas de fazer isso:
1º - vc pode carregar a imagem de alguma pasta do seu pc:
2º - vc pode carregar a imagem de um componente TImage
3º - vc pode carregar a imagem de um componente TImageList
1º - vc pode carregar a imagem de alguma pasta do seu pc:
SpeedButton1.Glyph.LoadFromFile(´c:\img.bmp´)
2º - vc pode carregar a imagem de um componente TImage
SpeedButton1.Glyph.Assign(Image1.Picture)
3º - vc pode carregar a imagem de um componente TImageList
ImageList1.GetBitmap(0, SpeedButton1.Glyph)
GOSTEI 0