how can i update a blob field using IBO ?. I want to insert a text at the
beginning of the blob data, without using data aware components. here's the
code. Am i missing something.. help..

the sql for the qryNote = Select * from note where no_businessid=44 and
no_displayname='Chattels'
the fields no_note & bn_comment is a blob field


qryNote.Close;
qryNote.Prepare;
qryNote.Open;

MyPictureColumnOld := TIB_Column(qryNote.FieldByName( 'NO_NOTE'));
with dsql do begin //TIB_DSQL
sqltext:='Update businessnote set bn_comment=:bn_comment where
bn_businessnoteid=1';
SQl.Text:=sqltext;
Prepare;
MyPictureColumnNew:= DSQL.ParamByName('bn_comment');
MyPictureColumnNew.AsString :='test' +#13+
MyPictureColumnOld.Asstring;
ExecSQL;
end;

here's the output if viewed in TWWDBRichEdit:

test
{\rtf1\ansi\deff0{\fonttbl{\f0\fnil\fcharset0 Arial;}{\f1\fnil Arial;}}
{\colortbl ;\red0\green0\blue0;}
\viewkind4\uc1\pard\cf1\lang1033\fs16 All light fittings\lang3081\f1\par
}

i don't want all that extra text. All i want is this text to be displayed
in TWWDBRichEdit:

test
All light fittings