Copy a long raw value

[ziller]

Hello,

i would like to copy a long raw value from one record to another. How to do that?

Regards.

 

[ziller]

here is my code :

oTo, oFrom : TStream;

begin
// Select 1 record
oFrom := Table1.CreateBlobStream(MyBlobField, bmRead);
// Select 2nd record
oTo := Table1.CreateBlobStream(MyBlobField, bmReadWrite);
Table1.Edit;
oTo.CopyFrom(oFrom,0);
Table1.Post;
oFrom.Free;
oTo.Free;
end;

and MyBlobField for the 2nd record is always empty :-(