Procedure TWPRTFDataCollectionBase.UndoDisableUnit: WPRTEDefsClass: WPRTEDefs.TWPRTFDataCollectionBaseDescription Disable the undo functionality. You can use UndocLock if you want to lock the undo stack against the "Clear" command