Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Добрый день! Не могу побороть этот чертов SetFocus Как в принципе решаются такие вещи? Есть txtBox1,txtBox2 и txtBox3.В LostFocus для txtBox1 я пишу процедурку поиска. Если поиск успешен, то курсор по setfocus попадает в txtBox3 Если не успешен, вызывается диалоговое окно с вопросом типа будем искать 1 - также или 2 - по другому Если 1, то надо попасть в txtBox1 Если 2, то надо попасть в txtBox2 И ни хрена не работает! Я ему txtBox1.setfocus, а он паразит, уходит по TabOrder :( Есть рецепт? С уважением. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2004, 10:44 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Если в событии Valid() в команде RETURN указать числовое значение, то фокус будет перемещен на указанное количество объектов вперед (или назад) в соответствии с TabOrder. TextBox1.Valid() ... RETURN (ThisForm.txtBox3.TabOrder-This.TabOrder) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 06.08.2004, 11:07 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
К сожалению, не выходит. К тому же taborder нету для textbox. (фокс 7.0) Сбой происходит в случае вызова диалогового окна. Ощущение, что фокс при "уходе" с экрана теряет последовательность taborder. Есть еще варианты? С уважением. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.08.2004, 18:11 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Опечатка Это свойство называется TabIndex (TabOrder действительно не существует вообще ни у одного объекта). И оно есть у всех объектов, которые могут принимать фокус. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.08.2004, 09:23 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Номер все равно не проходит :( Пришлось обходить: Сделал кнопку ПОИСК, под click которой сидит вызов метода поиска и проверка на успех/неуспех. В txtBox по keyPress вызывается ПОИСК.setfocus. И уже по успех/неуспех прыгаю в нужные поля. Это Седьмой круг ада какой-то... А с TabIndex так ничего и не вышло. С уважением. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.08.2004, 09:34 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Насколько я понял, Вы из формы вызываеие другую форму(поиск). Когда поиск отработал, отрабатывает событие "Activate" основной формы, и фокус сбивается. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.08.2004, 10:10 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Ну да! :( Фокус пропадает. Надо как-то запоминать, что-ли... Но это как-то все криво и не красиво. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.08.2004, 10:47 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Где именно (в каком методе какой формы) ты просишь кинуть setfocus на первый текстбокс? ИМХО, ошибка исключительно в неправильном выборе места. Если вызываешь из другой формы, то в качестве компромиса могу предложить создать в форме с текстбоксом метод, например, forsetfocus() Из формы поиска в нужном месте вызвать FormXXX.forsetfocus() (кстати можно с параметрами, определяющими куда именно скакать будем), а уже в этом методе прописать setfocus - тогда, возможно, activate отработает до setfocus и ничего не собъет... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.08.2004, 10:55 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
1.Введите новое свойство основной формы, например _activate 2. Присвойте ему значение по умолчанию .T. 3. В событии Click кнопки перед вызовом формы "Поиск" напишите: ThisForm._activate = .F. 4. В событии Activate основной формы напишите: If ThisForm._activate ....... & здесь Ваши операторы ....... Else ThisForm._activate = .T. И все. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 10.08.2004, 12:56 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Я добавил свойство THISFORM.lost_obj_name Для события LostFocus объекта пишу THISFORM.lost_obj_name=THIS.name А в Activate для формы по If ThisForm._activate *....... & здесь Ваши операторы *....... ELSE DO CASE CASE THISFORM.lost_obj_name='txt1' THISFORM.объект_формы1.setfocus CASE THISFORM.lost_obj_name='txt2' THISFORM.объект_формы2.setfocus ENDCASE ThisForm._activate = .T. endif ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.08.2004, 14:00 |
|
||
|
SetFocus для TxtBox
|
|||
|---|---|---|---|
|
#18+
Интересное решение, но работает!!! Создаю еще один текстбокс, делаю его невидимым, и в таб-ордере даю ему номер на 1 меньший чем у нужного текстбокса. потом когда надо сделать фокус на требуемом, делаю сетфокус на невидимом и он переходит.. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.04.2005, 18:34 |
|
||
|
|

start [/forum/topic.php?fid=41&msg=32642012&tid=1594500]: |
0ms |
get settings: |
11ms |
get forum list: |
21ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
73ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
49ms |
get tp. blocked users: |
1ms |
| others: | 248ms |
| total: | 426ms |

| 0 / 0 |
