[firebase-br] BlobImage on FBird & QReport
Wanderson Pereira
wpereira em ami.com.br
Qui Out 2 08:29:17 -03 2008
Mario, adapte esse código:
var var BlobStream : TClientBlobStream;
jpgFoto : TJPEGImage;
begin
if cdsTitularesFOTO.IsNull then
begin
Image1.Picture.Bitmap.FreeImage;
Image1.visible:=false;
Image1.Refresh;
Image1.visible:=true;
exit;
end;
BlobStream := TClientBlobStream.Create(cdsTitularesFOTO, bmRead);
jpgFoto := TJPEGImage.Create;
try
jpgFoto.LoadFromStream(BlobStream);
Image1.Picture.Assign(jpgFoto);
finally
jpgFoto.Free;
BlobStream.Free;
end;
end;
Mário Reis escreveu:
> Boas tardes,
>
> Como podemos imprimir uma imagem de campo Blob FBird
> com o QuickReport.
> Já alguem fez isso.
> Uso o U_BlobImageFB.Pas mas não estou a ver como fazer
> para "transportá-lo" para o QReport do D5/7
> Obrigado
> Mário
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use: http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
>
--
[ ]s
\\|//
<o o>
+----------------OOo-V-oOO---------------+
| \/\/anderson R. P. P. - Cabo Frio - RJ |
+--------=====--------------=====--------+
| mailto:wpereira em ami.com.br |
| UIN - 89166786 |
+----------------------------------------+
* Se está escrito ENTRADA PROIBIDA, para que a porta?*
Mais detalhes sobre a lista de discussão lista