Trinix 0 Denunciar post Postado Dezembro 6, 2009 ae pessoal queria saber como faz pra quando eu clicar em cima de um botao a imagen dele mudar sei que é no evento onclick mas qual comando ? como fasso pra q esse comando pege uma imagen X ??? Compartilhar este post Link para o post Compartilhar em outros sites
itepi 0 Denunciar post Postado Dezembro 9, 2009 Tenta desta forma : procedure TForm1.BitBtn1Click(Sender: TObject); begin {No código utilizo a propriedade TAG para controlar qual imagem devo colocar no botão} //Limpa imagem do botão se o mesmo possuir BitBtn1.Glyph := nil; if BitBtn1.Tag = 0 then begin //coloca a imagem com index 1 do ImageList no botão ImageList1.GetBitmap(1,BitBtn1.Glyph); BitBtn1.Tag := 1; end else begin //coloca a imagem com index 0 do ImageList no botão ImageList1.GetBitmap(0,BitBtn1.Glyph); BitBtn1.Tag := 0; end; end; Compartilhar este post Link para o post Compartilhar em outros sites