DeleteStreamRange(AStream,Int64,Int64,TCopyProgressProcedure) Method

procedure DeleteStreamRange(const Stream: AStream; const Position, Count: Int64;
 const ProgressCallback: TCopyProgressProcedure = nil);