Вопрос и Ответ 15 < Вопросы и Ответы по Delphi < Delphi

Новые книги

Standard Template Library Programmer

This document contains reference on SGI STL implementation

Воронка продаж в интернете [Инструмент автоматизации продаж и повышения среднего чека в бизнесе]

Солодар Мария – блогер, спикер крупнейших конференций по маркетингу, руководитель агентства по созданию автоворонок Evo-publishing, внедрившего автоворонки в работу топовых компаний Рунета.

Эта книга – первое на русском языке издание, посвященное созданию, оптимизации и автоматизации воронок продаж в интернете.

Автор книги предлагает решение: автоматизированную воронку – систему построения длительных отношений с пользователями для многоразовых продаж.

Ее результатом является повышение среднего чека, увеличение количества сделок, снижение затрат на рекламу, повышение конверсии и главное – автоматизация продаж в Сети, что сокращает издержки и положительно влияет на маржинальность.

Автор книги принесла на русскоязычное пространство тренд автоворонок, принимая участие в их создании для тысяч компаний: опт и розница, услуги и обучение, онлайн-магазины и b2b-сегмент, медицина и недвижимость, одежда и спорт… Весь этот опыт помещен на страницы книги: пошаговая инструкция по созданию и автоматизации воронки откроет новые возможности для ваших продаж в интернете.

Вопрос и Ответ 15

Версия для печати

Вопросы и Ответы

15. Возможно ли в компоненте TMemo отменить неверно произведенные действия при редактировании текста?

В компоненте TMemo предусмотрена возможность отмены неверных действий при редактировании. Для этого надо послать сообщение о необходимости произвести отмену действий. Компонент TMemo поддерживает три сообщения:

Сообщение	Описание
EM_CANUNDO	Возвращает флаг состояния операции отмены. Если операцию произвести нельзя - возвращается ноль, если можно - значение отлично от нуля.
EM_UNDO	Производит операцию отмены.
EM_EMPTYUNDOBUFFER	Обнуляет флаг состояния операции отмены.

Пример:

............

{Операция отмены для компонента Memo1 с проверкой флага отмены}
procedure TForm1.bUndoClick(Sender: TObject);
begin

IF Memo1.Perform(EM_CANUNDO, 0, 0) <> 0 THEN

Memo1.Perform(EM_UNDO, 0, 0);

end;

............

{Операция очистки флага состояния операции отмены с проверкой флага}
procedure TForm1.bUndoClearClick(Sender: TObject);
begin

IF Memo1.Perform(EM_CANUNDO, 0, 0) <> 0 THEN

Memo1.Perform(EM_EMPTYUNDOBUFFER, 0, 0);

end;

............

...предыдущая страница следующая...
оглавление