powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Где весь фокус?-)
8 сообщений из 8, страница 1 из 1
Где весь фокус?-)
    #34553134
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я опять грубо извиняюсь, но хочу услышать совет или прошу высказаться про моё решение

Можно ли в VB узанть, где, на каком объекте находится в данный момент фокус?

Я тут полазил, но внятного не нашёл, все хотят его передать, но никак не узнать, где он.

Моё решение может и грубо, но просто:

в модуле Формы создаю перемнную типа Object

и в событии GotFocus нужных объектов устанавливать этой переменной адрес объекта, а потом в общей процедуре выяснять с каким объектом он совпадает через Select Case и делать нужные действия, хотя может в API есть что-то более простое?

Подскажите или мнение выскажите!!!
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34553184
12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
погугли. помоему есть функца которая это ловит
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34553200
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
12345погугли. помоему есть функца которая это ловит

вопрос где, но и мой способ не плох и достаточно хорошо работает
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34553809
Фотография @TM@ROZчег
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
твой способ невероятно медленен (сравнительно)
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34557951
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
Private Declare Function GetFocus Lib "user32" Alias "GetFocus" () As Long
Возвращает HWND контрола имеющего фокус.
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34558365
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MsgBox Form1.ActiveControl.Name
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34558378
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
VladConnMsgBox Form1.ActiveControl.Name
мдя... все гениальное просто))
...
Рейтинг: 0 / 0
Где весь фокус?-)
    #34559245
Диса
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Nikz VladConnMsgBox Form1.ActiveControl.Name
мдя... все гениальное просто))

спасибо всем!☺
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Где весь фокус?-)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]