Fórum salvar .jpg em tabela access #344475
14/08/2007
0
estou tentando salvar imagens .jpg com meu programa em delphi, porém só consigo salvar .bmp.
Estou fazendo assim:
if OpenPictureDialog1.Execute then
try
TabProntuario.Edit;
TabProntuarioPAC_FOTO.LoadFromFile(OpenPictureDialog1.FileName);
finally
end;
Na Tabela, o campo TabProntuarioPAC_FOTO é do tipo Objeto OLE e o OpenPictureDialog a propriedade filter está assim: *.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf
Alguém sabe o que está errado? Ou alguma forma melhor de se fazer isso?
Desde já grato,
Marcelo R Moura
Marcelorm
Curtir tópico
+ 0Posts
14/08/2007
Marcelo.mileris
if OpenPictureDialog1.Execute then try TabProntuario.Edit; TabProntuarioPAC_FOTO.LoadFromFile(OpenPictureDialog1.FileName); TabProntuario.Post; // Adicionar essa linha finally end;
Gostei + 0
15/08/2007
Marcelorm
quando eu seleciono a imagem ,ainda na tela de dialogo, aparece o erro ´unknowm extension picture file extension(.jpg)´
Gostei + 0
15/08/2007
Massuda
Para incluir suporte a JPG, inclua no uses a unit JPEG ou baixe a biblioteca GraphicEx...
http://www.delphi-gems.com/GraphicEx.php
...e inclua a unit GraphicEx no uses.
Gostei + 0
15/08/2007
Vagner.oliveira
Para incluir suporte a JPG, inclua no uses a unit JPEG ou baixe a biblioteca GraphicEx...
http://www.delphi-gems.com/GraphicEx.php
...e inclua a unit GraphicEx no uses.[/quote:7fe106da9c]
Olha esse link q postei algum tempo atras:
http://forum.devmedia.com.br/viewtopic.php?t=87126&highlight=
Ele tem exatamente o que precisa.
Se nao me engano ele precisa de um compontente pra funcionar, pega o do link acima, acho q eh esse :D
[b:7fe106da9c]Sugestao:[/b:7fe106da9c] acho melhor salvar as imagens dentro de uma pasta, pois depois de muitos dados o banco ficara lento para realizar alguma consulta.
Gostei + 0
15/08/2007
Marcelorm
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)