Активация окна

[Space]

Не понимаю, почему при показе главного окна после старта проги оно получает ABM_ACTIVATE, ведь оно просто показывается, а фокус остаётся у другого приложения. У меня свой заголовок окна и когда моё приложение стартует на автостарте, окно показывается активным из-за ABM_ACTIVATE, хотя оно не активно, а активно окно другого приложения...

[Space]

ау, есть кто живой?

[MIT]

Есть! Я живее всех живых. Но я не вижу основного вопроса. Ты хочешь понять почему или что?

[Space]

Я уже подключил сюда GetForegroundWindow, но опять трабл - если активен, например, блокнот, то при показе моего приложения frmMain.Show оно отображается правильно - как неактивное. При щелчке на моём frmMain ABM_ACTIVATE не приходит! А при щелчке опять на блокноте, потом на frmMain ABM_ACTIVATE приходит и всё продолжает работать правильно. Глючит только при первом переключении окон. Почему?

Код: Выделить всё

   Select Case uMsg
'***************
    Case ABM_ACTIVATE
'Debug.Print "ABM_ACTIVATE", wParam, lParam
        If wParam Then
'окно активируется
'сообщение ABM_ACTIVATE приходит всегда при показе окна, но окно может не иметь фокус ввода, поэтому ещё проверим через GetForegroundWindow
          If frmMain.hwnd = GetForegroundWindow Then LoadBorderActive True
        Else
'окно деактивируется, если frmMain.Visible=False - окно прячется и менять бордюр нет смысла
            If frmMain.Visible Then LoadBorderActive False
        End If
End Select

[Space]

Живее живых, ты там жив?
Вообщем, получается так: При показе окна оно получает ABM_ACTIVATE, хотя активно другое окно, потом при клике на нашем окне система считает, что наше окно активно, т.к. получило уже ABM_ACTIVATE и не шлёт ABM_ACTIVATE, а шлёт его после отсылки сообщения о деактивации окна. Т.е. я так понимаю, система шлёт сообщения по очереди - активация/деактивация/активация/деактивация... и её больше ничего не волнует. Вот таки дела. Непонятно только, как это система допускает два одновременно активных окна. Как весело

[Space]

как весело... А как можно отловить любой клик на форме (т.е. типа KeyPreview, когда клик на контролах ловится ещё и формой)?

[Йода]

Совершенно точно зная, что ABM_ACTIVATE - сообщение Панели задач и не имеет никакого отношения к активации/деактивации моего окна, я всё- таки попробовал отловить его. Моё удивление было безграничным, когда при активации/деактивации моего окна сообщение ABM_ACTIVATE действительно приходило! Помедитировав на результат, я в течение 5-и часов рылся в сети вообще и в MSDN в частности, пытаясь найти объяснение этому феномену. Устав от бесплодых поисков, я решил узнать, что же приходит раньше: ABM_ACTIVATE или WM_ACTIVATE, и тут выяснилось, что значение константы ABM_ACTIVATE равно значению константы WM_ACTIVATE ... И ещё: Space, я так и не понял, что же у тебя не получается.
З.Ы. Ура! У меня появилась первая звёздочка!!!

[Space]

ну как же? я же писал, при активации моего окна мне надо подсветить бордюр окна, сообщение об активации приходит некорректно. Или надо ловить другое какое-то сообщение?

[MIT]

Живее живых, ты там жив?

Я тут, и я жив. Только вот по основной теме как-то сказать особо и нечего: сам с таким никогда не сталкивался, в сети данных тоже не нашел (быстрым гуглингом), вот и не постил.

А как можно отловить любой клик на форме (т.е. типа KeyPreview, когда клик на контролах ловится ещё и формой)?

Наверно хук тебе вполне подойдет.

я же писал, при активации моего окна мне надо подсветить бордюр окна, сообщение об активации приходит некорректно. Или надо ловить другое какое-то сообщение?

Это в смысле "помигать ораньжевеньким на панели задач?" или что?

З.Ы. Ура! У меня появилась первая звёздочка!!!

Поздравляю!

[Space]

блин, ну вы чё, вообще все в танке? Когда окно активно, один цвет бордюра окна, неактивно - другой!

[Йода]

2Space: Всё правильно, ловишь WM_ACTIVATE. Просто при создании окна рисуй бордюр подсвеченым.
2MIT: Спасибо.
З.Ы.

Когда окно активно, один цвет бордюра окна, неактивно - другой!

Совершенно не обязательно: Пуск-Панель управления-Экран-Оформление-Дополнительно: Заголовок активного окна = Заголовок неактивного окна. Зачем? А я хочу чтобы окна так выглядели. И они будут так выглядеть. Потому что мне так нравится. И вообще, если какая-то программа будет мне указывать какого цвета у неё бордюр, она будет моментально снесена.

З.З.Ы. Еле нашёл : Градиентный заголовок окна.

[Space]

люди!!! вникните в суть проблемы!

[Space]

а как можно сообщить системе, что моё окно - неактивное? Т.е. что-то вроде Me.LostFocus...

[Space]

итак, запускаем проект, быстренько переключаемся на окно блокнота или другого приложения. Когда появится наше окно, щёлкаем на нём. Здесь мы видим, что бордюр не изменил цвет - окно вроде неактивно. Обратно щёлкаем на окне другого приложения, затем на нашем - теперь наше окно отмечается бордюром как активное. Проблема неактивации окна при первом клике на нём описана выше, необъяснена и её решение не найдено!

[Space]

всё, гениальные идеи кончились

[Space]

оказывается, надо делать так:

Код: Выделить всё

   Select Case uMsg
'***************
    Case WM_NCACTIVATE
        If wParam Then
Debug.Print "Active "; lParam; wParam
            SetBorderActive True
        Else
Debug.Print "DeActive "; lParam; wParam
         SetBorderActive False
        End If
...

но, тогда окно мерцает при фоновом показе, пока не нашёл, как избавиться...