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
  • Неплохой вариант, спасибо, этот вариант помог. 21 дек 2020 в 11:55

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

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