var src1, src2, dest: TStream;
dest.CopyFrom(src1, 0);
dest.CopyFrom(src2, 0);