I prefer to see things more generic:

var
AStream: TStream;
begin
AStream := ATDataset.CreateBlobStream( ).
...

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com