Вниз
Скачать: CL | DM;

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

← →
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]

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


← →
AlexanderMS ©   (2006-05-07 20:47) [7]


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


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

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


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


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


Да.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
2-1146164152
Alien1769
2006-04-27 22:55
2006.05.21
Работа с базой данных в сети


2-1146230106
Raptoridzevv
2006-04-28 17:15
2006.05.21
прозрачная форма


15-1145858794
Spirit of RO
2006-04-24 10:06
2006.05.21
Используете ли вы


15-1145732092
DBwewq
2006-04-22 22:54
2006.05.21
Помогите пожалуйста! В чем ошибка! timer:longint absolute $40:$6c


15-1145929843
antonn
2006-04-25 05:50
2006.05.21
Запустить ICQ




   Наверх