Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Trinix

Como trocar a imagen de um botao quando clicar em cima dele

Recommended Posts

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

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

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.