PNG no Delphi Win32

Procurando melhorar o visual das minhas aplicações, comecei a procurar pela internet pelos belos ícones e imagens do Windows Vista. Encontrei vários pacotes de imagens, a maioria deles continha arquivos PNG.

Como não queria convertê-los para JPG e causar uma possível perda de qualidade e também perda do efeito de transparência, procurei por algum componente que permitisse utilizar arquivos PNG diretamente no Delphi. Encontrei então o PNG Delphi, um componente feito pelo brasileiro Gustavo Daud, e que pode ser baixado em http://pngdelphi.sourceforge.net.

O padrão PNG veio para substituir o Gif, apresentando o recurso de transparência parcial de imagens, e com o PNG Delphi, conseguimos isso.

Instalando

Infelizmente o componente não vem com um pacote pronto para instalação, e devemos então criar esse pacote. Entre no menu Component -> Install Component. Na janela que surgir, Figura 1, escolha a guia Into new package . No campo Unit file name localize o arquivo pngextra.pas.

Figura 1. Instalando o PNGDelphi

No campo Package file name, clique no botão Browse e localize a pasta do componente e dê um nome para o novo pacote, por exemplo PNGDelphi.dpk e confirme, em Package description coloque uma descrição para o pacote, como “Imagens PNG no Delphi”. Com tudo isso, confirme e na guia Samples será acrescentado o componente PNGButton.

Exemplo

Inicie um novo projeto e na janela principal adicione um PNGButton. O PGNButton é  muito versátil, pois pode atuar como um botão comum quando sua propriedade ButtonStyle é ajustada para pbsDefault, como um botão flat se estiver ajustado para  pbsFlat e até mesmo como painel quando o ButtonStyle for pbsNoFrame.

Outras três propriedades interessantes são, ImageNormal, ImageDown, ImageOver que são utilizadas para mostrar o estado do botão.

ImageNormal – É a imagem principal do botão. Quando o estado do mesmo for setado para enabled = false, o componente cria uma imagem transparente, para indicar o estado desabilitado.

ImageDown – Será exibida quando o usuário clicar sobre o botão, ou seja, quando o mesmo estiver pressionado

ImageOver – É a imagem que indica que o mouse está sobre ele.

Caso ImageDown e ImageOver não estejam configurados, a imagem contida em ImageNormal será utilizada. Escolha então para cada propriedade acima mencionada um arquivo PNG e execute a aplicação.

Além do componente PngButton, são oferecidas outras classes que permitem fazer a manipulação de arquivos PNG, como conversão de Jpg para Png, BMP para PNG e vice-versa. Também pode-se criar arquivos semi-transparentes, manipular o tamanho das imagens entre outras rotinas, todas explicadas em um ótimo help contido no arquivo de download.

Conclusão

Como sempre os desenvolvedores Delphi sempre conseguem o que querem. Se sai um novo tipo de arquivo, vamos lá e criamos uma maneira de poder ser utilizado no Delphi, este componente é um exemplo disso.