Непонятное поведение setfocus на TABSTRIP / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Непонятное поведение setfocus на TABSTRIP

5 сообщений из 5, страница 1 из 1

Непонятное поведение setfocus на TABSTRIP

#37192335

Alex_men

Гость

Добрый день!

Вопрос такой

У меня на форме есть TABSTRIP с 3 закладками. Выстроил переход при нажатии TAB по контролам с переключением закладок. Столкнулся с такой неприятной штукой. Рядом с одним из полей формы(пусть будет поле А), на второй закладке, есть кнопка по которой открывается справочник. Если я открываю справочник и подставляю от туда значения в поле А- все хорошо. И есть кнопка по которой осуществляется поиск в справочнике на основании значения введенного в поле А. Вот тут и кроется засада. Если в поле отсутствует значение для поиска, то выбрасываю соответствующее сообщение с помощью msgbox. При этом фокус должен устанавливаться в поле А, куда вводится параметр поиска.

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.

 If IsNull(Me.s_cod56.Text) Or Me.s_cod56.Text = "" Then
            MsgBox "Отсутствует параметр поиска.", vbCritical + vbOKOnly, "Ошибка"
            
            Set Me.TbS.SelectedItem = Me.TbS.Tabs( 2 )            
            Me.s_cod56.SetFocus            
            Exit Sub
        Else
            Call sw_spr_search(Me.s_cod56.Text, "56")
 End If

Вот тут и кроется пакость, после msgbox система переходит на tabindex 0 в форме (если не указывать поле куда хочу поставить курсор , те исключить строки

Код: plaintext

1.
2.
3.

Set 
Me.TbS.SelectedItem = Me.TbS.Tabs( 2 )            
Me.s_cod56.SetFocus

а если не исключать, то на первых контрол первой закладки.
всю голову сломал уже. Придумал конечно вариант без MSGBOX. но интересно разобраться

...

Рейтинг:

0 / 0

31.03.2011, 13:51

| Ответить | Цитировать | Написать

Непонятное поведение setfocus на TABSTRIP

#37192998

Alex_men

Гость

Alex_men,

Вот неприятность такая же ерунда при вызове ACTIVХ календарика, как только я его закрываю фокус теряется, а потом переходит на первый элемент массива TABINDEX :( неужели никто не сталкивался?

...

Рейтинг:

0 / 0

31.03.2011, 17:52

| Ответить | Цитировать | Написать

Непонятное поведение setfocus на TABSTRIP

#37193047

Alex_men

Гость

Alex_men,

С календарем вопрос решил, а вот с msgbox не совсем. на форме есть еще несколько контролов у которых идет контролль правильности ввода данных и в случае ошибки сообщение MSGBOX. Да и событие on error никто не отменял. Есть у кого идеи?

...

Рейтинг:

0 / 0

31.03.2011, 18:15

| Ответить | Цитировать | Написать

Непонятное поведение setfocus на TABSTRIP

#37193785

TpaBka

Участник

Сообщения: 564

Рейтинг: 0 / 0

Попробуй перед а может после msgbox так и так поробуй вставить DoEvents

...

Рейтинг:

0 / 0

01.04.2011, 10:44

| Ответить | Цитировать | Написать

Непонятное поведение setfocus на TABSTRIP

#37193867

Alex_men

Гость

TpaBka,

пробовал не прокатывает. часть вопросов решила следующая фишка. На форуме наткнулся что MSGBOX берет фокус на себя и всем элементам на форме ставит

Код: plaintext

контрол.enabe=false

соответственно сделав вот такой финт

Код: plaintext

1.
2.

контрол.enabe=true
контрол.setfocus

я получил желаемый результат. Но тут есть осечка. это работает если вызов MSGBOX идет из стандартного элемента (например поле ввода, кнопка и т.п.). Если вызов идет из элемента ActivX такая штука не прокатывает. пока сижу ищу пути обхода.
зато попутно уже 7 багов выловил:)

...

Рейтинг:

0 / 0

01.04.2011, 11:19

| Ответить | Цитировать | Написать

5 сообщений из 5, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Непонятное поведение setfocus на TABSTRIP

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&msg=37193047&tid=2158840]:	0ms
get settings:	9ms
get forum list:	15ms
check forum access:	4ms
check topic access:	4ms
track hit:	37ms
get topic data:	11ms
get forum data:	2ms
get page messages:	46ms
get tp. blocked users:	1ms
others:	16ms

total:	145ms