salvar .jpg em tabela access
Caros,
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
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
Curtidas 0
Respostas
Marcelo.mileris
14/08/2007
Não está faltando o POST?
if OpenPictureDialog1.Execute then try TabProntuario.Edit; TabProntuarioPAC_FOTO.LoadFromFile(OpenPictureDialog1.FileName); TabProntuario.Post; // Adicionar essa linha finally end;
GOSTEI 0
Marcelorm
14/08/2007
não não...
quando eu seleciono a imagem ,ainda na tela de dialogo, aparece o erro ´unknowm extension picture file extension(.jpg)´
quando eu seleciono a imagem ,ainda na tela de dialogo, aparece o erro ´unknowm extension picture file extension(.jpg)´
GOSTEI 0
Massuda
14/08/2007
Com mensagem de erro sempre fica mais fácil...
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.
unknowm extension picture file extension(.jpg)
JPG não é um formato de imagem suportado pelos componentes padrão do Delphi.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
Vagner.oliveira
14/08/2007
Com mensagem de erro sempre fica mais fácil...[quote:7fe106da9c=´marcelorm´]unknowm extension picture file extension(.jpg)
JPG não é um formato de imagem suportado pelos componentes padrão do Delphi.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
Marcelorm
14/08/2007
Vlw Rapaziada, consegui o que queria!
GOSTEI 0