Проблема с фокусом

← →
AlexanderMS © (2006-05-07 19:41) [0]

Проблема в следующем. Отображено 2 формы: основная и окно поиска (собственное, а не FindDialog). Когда фрагмент найден, фокус перемещается с окна поиска на основное, а именно на RichEdit. В этом случае кнопка на окне поиска (с Default = true) по клавише Enter не доступна, приходится на форму мышкой щёлкать, а иначе происходит редактирование RichEdit. Подскажите, пожалуйста, как решить эту проблему?

← →
Leonid Troyanovsky © (2006-05-07 19:47) [1]

> AlexanderMS © (07.05.06 19:41)

> Подскажите, пожалуйста, как решить эту проблему?

Не перемещать фокус на RichEdit?

--
Regards, LVT.

← →
Мефисто (2006-05-07 19:50) [2]

По завершении поиска:

TForm.Activate;
TForm.SetFocus;

?

← →
AlexanderMS © (2006-05-07 20:27) [3]

> Не перемещать фокус на RichEdit?

Если не перемещать, то не видно выделение фрагмента в RichEdit.

> TForm.Activate;
> TForm.SetFocus;

Которая? В любом случае не получается.

← →
ЛшдлуттнСфе (2006-05-07 20:33) [4]

после отработки выделения верните фокус кнопке.
Button1.SetFocus;

← →
Leonid Troyanovsky © (2006-05-07 20:34) [5]

> AlexanderMS © (07.05.06 20:27) [3]

> Если не перемещать, то не видно выделение фрагмента в RichEdit.

HideSelection?

--
Regards, LVT.

← →
ЛшдлуттнСфе (2006-05-07 20:37) [6]

А, кажется я понял.
При потери фокуса, ричедит действительно скрывает выделенное (или сбрасывает совсем, не проверял).
В этом случае, возможно два варианта:
сложный: воспользоваться возможностью атрибутов текста и поддержать выделение.
простой: перехватить нажатие клавиши в ричедите непосредственно.

> ЛшдлуттнСфе (07.05.06 20:37) [6]

Спасибо. Я предпочту простой.

P.S. ЛшдлуттнСфе = KilkennyCat, я так понимаю.

← →
ЛшдлуттнСфе (2006-05-07 21:03) [8]

> P.S. ЛшдлуттнСфе = KilkennyCat, я так понимаю.

Да.

Проблема с фокусом Найти похожие ветки