-----------------------------------------------------------------
рrocedure CMEditUndo(var Msg: TMessage); virtual cm_First + cm_EditUndo;
Автоматически отвечает на выбор в меню идентификатором меню для cm_editUndo, вызывая метод Undo.
См. также: TEdit.Undo.