Fórum [Ajuda] Campo Image com PNG dando erro #457577
05/10/2013
0
Olá amigos,
Estou aqui pedindo a ajuda de vocês para tentar solucionar o meu problema que é o seguinte:
Estou usando o Delphi XE4 e tenho um componente Image que vai receber imagens do tipo PNG.
Estou chamando as imagens com o seguinte comando:
As imagens já estão com o fundo transparente porém ao carregá-las elas aparecem com um fundo branco.
Gostaria de saber se existe algum comando ou componente para eu utilizar para resolver este problema.
PS. Já tentei usar o componente PngComponents for Delphi 2009-XE5 do site da Embarcadero. Segue o Link: [url]http://cc.embarcadero.com/item/26127[/url]
Porém o pacote só tem os seguintes componentes depois de instalado:
Espero que possam me ajudar!
Muito obrigado à todos!
Estou aqui pedindo a ajuda de vocês para tentar solucionar o meu problema que é o seguinte:
Estou usando o Delphi XE4 e tenho um componente Image que vai receber imagens do tipo PNG.
Estou chamando as imagens com o seguinte comando:
begin if OpenPictureDialog1.Execute then ImagemPNG1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
As imagens já estão com o fundo transparente porém ao carregá-las elas aparecem com um fundo branco.
Gostaria de saber se existe algum comando ou componente para eu utilizar para resolver este problema.
PS. Já tentei usar o componente PngComponents for Delphi 2009-XE5 do site da Embarcadero. Segue o Link: [url]http://cc.embarcadero.com/item/26127[/url]
Porém o pacote só tem os seguintes componentes depois de instalado:
TPngSpeedButton TPngBitBtn TPngImageList TPngImageCollection TPngCheckListBox
Espero que possam me ajudar!
Muito obrigado à todos!
Jore Maximus
Curtir tópico
+ 0
Responder
Posts
07/10/2013
Jore Maximus
Alguém?
Responder
Gostei + 0
08/10/2013
Marcos Oliveira
Jore, já passei por um problema parecido, e o problema estava na imagem. Certifique-se que o fundo tenha uma cor só, porque em algumas imagens, ocorrem variações de cores no fundo que influenciam diretamente nesta propriedade do componente. Você já fez testes com outras imagens?
Att,
Marcos
Att,
Marcos
Responder
Gostei + 0
08/10/2013
Jore Maximus
Olá Marcos Oliveira, tudo bem? Obrigado por responder!
Estou usando o Alpha Control para trocar as Skins.
As imagens que vou usar são PNG e não tem cor de fundo!
Nos exemplos abaixo eu mostro melhor...
Na Imagem 1. O form tem fundo Cinza Escuro, e a imagem foi carregada pelo Picture do componente Image e roda normalmente sem mostrar cor de fundo. Como deve ser!
Veja nas imagens:
Imagem 1
[url]http://img14.imageshack.us/img14/7845/dqly.jpg [/url]
Abaixo no exemplo Imagem 2. A imagem é carregada com o programa em execução e mostra um fundo branco.
Imagem 2
[url]http://img202.imageshack.us/img202/8259/w06y.jpg [/url]
Eu quero que carregue como no exemplo 1 pois não deverá mostrar cor de fundo!
Descobri que o erro esta no comando que ponho no ComboBox para abrir as imagens veja:
Sabe o que posso por neste comando para ler corretamente as PNG´s?
Obrigado a todos!
Estou usando o Alpha Control para trocar as Skins.
As imagens que vou usar são PNG e não tem cor de fundo!
Nos exemplos abaixo eu mostro melhor...
Na Imagem 1. O form tem fundo Cinza Escuro, e a imagem foi carregada pelo Picture do componente Image e roda normalmente sem mostrar cor de fundo. Como deve ser!
Veja nas imagens:
Imagem 1
[url]http://img14.imageshack.us/img14/7845/dqly.jpg [/url]
Abaixo no exemplo Imagem 2. A imagem é carregada com o programa em execução e mostra um fundo branco.
Imagem 2
[url]http://img202.imageshack.us/img202/8259/w06y.jpg [/url]
Eu quero que carregue como no exemplo 1 pois não deverá mostrar cor de fundo!
Descobri que o erro esta no comando que ponho no ComboBox para abrir as imagens veja:
begin
if not Loading and (sSkinManager1.SkinName <> sComboBox1.Items[sComboBox1.ItemIndex]) then begin
sSkinManager1.SkinName := sComboBox1.Items[sComboBox1.ItemIndex];
end;
end;
if not Loading and (sSkinManager1.SkinName <> sComboBox1.Items[sComboBox1.ItemIndex]) then begin
sSkinManager1.SkinName := sComboBox1.Items[sComboBox1.ItemIndex];
end;
end;
Sabe o que posso por neste comando para ler corretamente as PNG´s?
Obrigado a todos!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)