atribuir TBlobField a um TImage

Question

como fa�o para exibir em um componente TImage uma imagem do campo da tabela BLOB (firebird 1.5 e componente de acesso MDO).obs� n�ao posso utilizar o TDBImage....

Gandalf.nho · Answer

Use SaveToStream e LoadFromStream...

Raserafim · Answer

tentei TBlobStream, mas n�o consegui, tentei TMemoryStream e tb n�o consegui. Devo ter feito alguma coisa errada.Voc� pode dar um exemplo mais expl�cito de como fazer isso?...

Gandalf.nho · Answer

D� uma olhada aqui [url]//forum.clubedelphi.net/viewtopic.php?t=23497[/url]...

Raserafim · Answer

vi o t�pico, valeu gandalf. vai ser �til quando quiser usar jpeg.
para usar bmp consegui um modo mais simples:

var
Img: TString;
begin
if CAMPOBLOB.Value <> �� then
begin
Img := Query.CreateBlobStream(CAMPOBLOB , bmRead);
Image1.Picture.Bitmap.LoadFromStream(Img);
end;
end;

F�rum atribuir TBlobField a um TImage #275465