Как перехватить (обнаружить) команду Paste в TMemo?

Как поймать команду "Вставить" и изменить текст в буфере обмена до того, как этот текст будет вставлен в TMemo, но после вставки текст в буфере обмена должен быть таким же, как и до изменения?

Например, в буфере обмена есть текст «Простой вопрос», текст, который идет в TMemo, — «Простой вопрос», а после этого текст в буфере обмена, как и до изменения, — «Простой вопрос».