ActiveDelphi

[kanedasam]

QR e DB Componente JPEG Para Download


Foi decidido de ultima hora, a retirada do tempo de funcionamento do
componente e a personalização para o cliente (somente no shareware na
registrada sera mantido a personalização), a limitação esta na colocação de telas de mensagens
em todos os procedimentos de funcionamento do componente.

Não deixa de ler o arquivo \"leiame.txt\" dentro do zip

http://br.geocities.com/dbjpeg/QrDBJpegShare.zip

Acesse a www.sharkinformatica.cjb.net ( em construção ) para maior
detalhamento da documentação ou envie uma e-mail com questionamento
e sugestões para kaneda_sam@hotmail.com


-------------------------------------------------------------------------------
1a. Introdução
-------------------------------------------------------------------------------

Este componente tem como intuito disponibilizar a facilidade de manuseio em relatórios e formulários com as complicadas imagens JPEG que são muito mal planejadas nas libraries Jpeg do delphi na compressão e descompressão destas imagens causando as exeption Ejpeg com as mensagens invalid bitmap, error #42, error #52 e outras velhas conhecidas pelos programadores Dephi novatos e ate mesmo os mais experientes, além de serem muito mal documentadas.

OBS: Mesmo com o seu código certinho muitas vezes aparecem às mensagens de erros, isto mata qualquer programador.

A Inclusão de linhas de códigos simplesmente para exibir um JPEG nos dá um trabalho desnecessário, pois sendo que se o Delphi com os seus componentes trazem a descrição de arquivos “*.j peg” e “*.jpg” , por exemplo TOpenPictureDialog , deveriam realmente suportar e serem compatíveis com estes tipos de arquivos, um exemplo pratico disso e em aplicações que necessitam a inclusão de imagem, normalmente se faz os seguintes passos :

- Inclui a Unit Jpeg
- Inclui um componente DBImage
- Inclui um componente OpenPictureDialog e outros.
- e alinha de código :

Procedure TForm1.DBImage1Click(Sender: TObject);
begin
OpenPictureDialog1.Execute;
Table1.Edit;
DbImage1.Picture.LoadFromFile(OpenPictureDialog1.Filename);
end;

Ate ai tudo bem a imagem aparece no DbImage1 , mas quando você tenta gravar a imagem os componentes gravam na verdade e um valor Nil isto acontece também com outros formatos, concluindo, se você tem um registro com um campo blob com um arquivo formato jpeg ao procurá-lo você não encontra a sua imagem. E mesmo resolvendo isso você se esbarra em outro problema e na hora de descomprimir , com a maioria das vezes causando as exeption citadas antes ou Violation no endereçamento, isto sempre foi um problema pois os Jpeg tem sistema de algoritmos, quantização, métodos de compressão e descompressão e entre outros conceitos em padrões diferentes.
Os componentes são :

TQRJPEGImage :
TQRDBJPEGImage :
TJPEGImage :
TDBJPEGImage :



Estes componentes tratam todos estes problemas e mais :
- Suporta a sua imagem criada em qualquer padrão e valores.
- Padroniza a sua imagem ( JPEG 2000 , Jpeg , Jpg ).
- Carregue as suas imagem apartir de uma stream .
- Codificar imagens de JPEG -. Estes componentes são decodificadores, não um coder. Isso significa que você pode ver o que se arquiva no jpeg , mas você não pode criar arquivos como JPEG.
Obs : Método coder já em implementação
- Otimização dos códigos e aumento de desempenho nas aplicações .
- Otimiza a imagem jpeg fazendo ocupar menos espaço desnecessário diminuindo assim o tamanho do seu banco de dados .
- Controles de Otimização em tempo de execução.
- Utilize FileName para carregar uma imagem sem precisar escrever código com Strems para formulários e relatórios .
- Tratamento da imagem em tempo de execução ( GrayScale, Trema, Etc ...).
- e muito mais .
_________________
Washington M. almeida
_________________
WASHINGTON M. ALMEIDA
washington@skysat.com.br