Para añadir la opción de "Deshacer" en un control de tipo TMemo, basta con ejecutar esto:
Memo1.Perform(EM_UNDO, 0, 0);
Publicado el: 2003-09-29