Показать сообщение отдельно
  #10  
Старый 02.03.2017, 09:01
Droltromed Droltromed вне форума
Прохожий
 
Регистрация: 22.02.2017
Сообщения: 9
Версия Delphi: Delphi XE10
Репутация: 10
По умолчанию

Цитата:
Поменять цвет фона выделения

Спасибо большое, действительно работает. В USES для него пришлось подцепить MSHTML.
Повесил на ApplicationEvents.OnDeactivate - выделяет выделенный текст цветом при потере фокуса формой.
Но появилась проблема - если повесить
Код:
SelRange.execCommand('BackColor', false, 'false');
на OnActivate, то текст сначала сбрасывает выделение при клике на форме, а уже потом срабатывает сброс цвета, т.е. у ничего.

Но решение практически найдено. Попробую найти способ как выполнить между получением фокуса формой и обработкой клика мыши (сбрасывающий прежнее выделение текста).
Если кликнуть так, чтобы выделение текста не сбросить или просто взять в фокус форму без клика, то всё идеально - текст помечается цветом при потере фокуса и теряет цвет при его получении, показывая обычное выделение текста.

Спасибо, практически идеальное решение) Попытаюсь решить вопрос с получением формой фокуса, чтобы сбросить цвет до сброса выделения и отпишусь об успехе или неудаче.
Ответить с цитированием