Código Delphi [-] BlobStream := CreateBlobStream(ParamByName('IMAGEN'), bmWrite); try BlobStream.CopyFrom(MS, MS.Size); finally BlobStream.Free; end;
BlobStream := CreateBlobStream(ParamByName('IMAGEN'), bmWrite); try BlobStream.CopyFrom(MS, MS.Size); finally BlobStream.Free; end;