0

Копирую текст из Memo2 (Первую строку Memo2) в Memo1 туда где установлен курсор - мышки.

Memo1.SetFocus;
Memo1.SetSelTextBuf(PWideChar(Memo2.Lines[0]));

Возник вопрос: Как отменить последнее действие ? То есть после нажатия на кнопку последнее действие должно отмениться.

Пробовала через (но это отмена только ручных действий и не срабатывает):

Memo1.Undo;

1 ответ 1

1

Можно просто запоминать Memo1.Lines.

Вторая строчка,кстати, может выглядеть попроще.

При действии, изменяющем Memo1.Lines:

TempList.Assign(Memo1.Lines);
Memo1.SelText := Memo2.Lines[0];

Восстановление:

Memo1.Lines.Assign(TempList);

Более продвинутый метод - запоминать только изменения - для этого понадобится какая либо diff-библиотека (TDiff, некое обновление), тогда можно не один шаг запоминать.

1
  • Неплохой вариант, спасибо, этот вариант помог. Commented 21 дек. 2020 в 11:55

Ваш ответ

Нажимая «Отправить ответ», вы соглашаетесь с условиями пользования и подтверждаете, что прочитали политику конфиденциальности.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.