Thanks Luiz,

Arno

""Luiz"" <cprmlao@...> schreef in bericht
news:018401c2f95b$9dc37dd0$0a0aa8c0@......

> Arno,
>
> ----- Original Message -----
> From: "Arno Brinkman" <firebird@...>
> > var
> > PICTField:TIB_Column;
> > begin
> > PICTField := TIB_ColumnBlob( qry.FieldByName( 'FOTO' )); <===
> > tb := cr.CreateBlobStream(PICTField,bsmread); <===
> > try
> > with MyBitMap do begin
> > LoadFromStream(tb);
> > end;
> > finally
> > tb.free;
> > end;
> > end;
> >
> > PICTField is just an cast ?
> Yes, but you can use directly qry.FieldByName( 'your_column' )
>
> > What is cr ?
>
> My error. Where you read cr read then qry(your query).
>
>
>
>
>
>

___________________________________________________________________________

> IB Objects - direct, complete, custom connectivity to Firebird or

InterBase

> without the need for BDE, ODBC or any other layer.
>

___________________________________________________________________________

> http://www.ibobjects.com - your IBO community resource for Tech Info

papers,

> keyword-searchable FAQ, community code contributions and more !
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>