Procedure TWPRTFReader.CloseDestination(CurrentDest:TWPRDS; NewDest:TWPRDS)Unit: WPIOReadRTFClass: WPIOReadRTF.TWPRTFReaderParameters CurrentDest:TWPRDS NewDest:TWPRDS