FAQ - Функция Undo в TMemo.

Функция Undo в TMemo.

В компоненте TMemo предусмотрена функция отмены последней правки (Undo). Ее можно вызвать следующим образом:Memo1.Perform(EM_UNDO,0,0); Узнать о том, возможна ли отмена (т.е. есть ли что отменять) можно следующим образом:
UndoEnabled:=(Memo1.Perform(EM_CAUNDO,0,0)0);