Memo1.Perform(EM_UNDO, 0, 0);