Esse programa esta instalado em um cliente, e ele tira as fotos e
Direto da maquina digital passa pro computador.. por isso o tamanho
Da foto..
O código é o seguinte:
var
Imagem: TPicture;
JPEG : TJPEGImage;
begin
OpenDialog.Execute;
if OpenDialog.FileName = '' then
Exit;
Imagem := TPicture.Create;
Imagem.LoadFromFile(OpenDialog.FileName);
JPEG := TJPEGImage.Create;
JPEG.Assign(Imagem);
JPEG.CompressionQuality := 25;
Clipboard.Assign(JPEG);
DBImage1.PasteFromClipboard;
Imagem.Free;
end;
Bom, não sei se isto esta correto, só sei que depois de gravadas
Umas 30 imagens de 1 mb cada no banco de dados.. ele foi pra mais de
500 MB... e as outras informções são somente texto...
O que acontece para aumentar tanto o tamanho do banco?
Obrigado
-----Mensagem original-----
De: [email protected] [mailto:[EMAIL PROTECTED] Em
nome de Rubem Nascimento da Rocha
Enviada em: terça-feira, 7 de março de 2006 07:59
Para: [email protected]
Assunto: RE: [delphi-br] Converter Imagem
Prioridade: Alta
JPEG com mais de 1MB de tamanho? Que imagens são essas que vc grava no
banco? Imagino que se você gravasse como BMP teria uns 10MB cada imagem!
Posta o teu código que grava as imagens no banco pra gente analisar.
Sds.
>From: Anderson Cichon <[EMAIL PROTECTED]>
>Reply-To: [email protected]
>To: [email protected]
>Subject: [delphi-br] Converter Imagem
>Date: Mon, 06 Mar 2006 22:54:07 -0300
>
>Boa tarde
>
>Estou gravando imagens jpeg no banco de dados firebird..
>O problema é que cada arquivo de imagem de mais de 1 mb...
>Como faço para diminuir o tamanho do arquivo antes de
>armazenar no banco
>
>Muito obrigado
>
_________________________________________________________________
MSN Messenger: converse com os seus amigos online.
http://messenger.msn.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
