DBImage não funciona com imagem tipo JPEG em campo Blob
Tenho um cadastro de imagens e preciso mostrar em um form, entao tive a surpresa de q o componente DBImage não aceita tipo JPEG em campo blob do Firebird. Logo para resolver este problema coloquei um componente Image e fiz o seguinte:
var
Imagem : TMemoryStream;
begin
Imagem := TMemoryStream.Create;
try
TabelaIMAGEM.SaveToStream(Imagem);
Image1.Picture.Bitmap.LoadFromStream(Imagem)
finally
Imagem.Free;
end;
Pois este código não funcionou... Alguem poderia me ajudar a mostrar esta imágem? Não gostaria de ter q instalar um componentes tipo DBImage que aceite o tal do tipo JPEG.
Obrigado!
var
Imagem : TMemoryStream;
begin
Imagem := TMemoryStream.Create;
try
TabelaIMAGEM.SaveToStream(Imagem);
Image1.Picture.Bitmap.LoadFromStream(Imagem)
finally
Imagem.Free;
end;
Pois este código não funcionou... Alguem poderia me ajudar a mostrar esta imágem? Não gostaria de ter q instalar um componentes tipo DBImage que aceite o tal do tipo JPEG.
Obrigado!
Mutz
Curtidas 0