I forget to say that:

var tb:TStream;

Luiz

----- Original Message -----
From: "Luiz" <cprmlao@...>
To: <IBObjects@yahoogroups.com>
Sent: Wednesday, April 02, 2003 5:28 PM
Subject: Re: [IBO] IB_Query.FieldByName(). and
IB_Query.ParamByName(). -SaveToStream() -LoadFromStream() ?


> Arno,
>
> Something as:
>
> var PICTField:TIB_Column;
> PICTField:= TIB_ColumnBlob( qry.FieldByName( 'FOTO' ));
> tb:=cr.CreateBlobStream(PICTField,bsmread);
> try
> with MyBitMap do begin
> LoadFromStream(tb);
> end;
> finally
> tb.free;
> end;
>
> Luiz
> ----- Original Message -----
> From: "Arno Brinkman" <firebird@...>
> > Hi,
> >
> > I must miss something here. How can i LoadFromStream and SaveToStream on
> > blobs with TIB_Query ? Or should i use another component / methods for
> this
> > ?