Проблема с передачей фокуса окну

[Mephi$topheL]

Существует необходимость вывести окно на передний план при возникновении определенного события.

Метод SetFocus() не канает- когда окно под другими окнами, на передний план не выскакивает.

FormStyle = fsStayOnTop тоже не подходит - окно выводится на передний план, но закрепляется поверх всех окон, что крайне нежелательно.

Что делать?

Кодю в Borland C++ Builder 6

[yan_kos]

Есть ф-я в ВиньАПИ SetWindowPos там есть параметер HWND hWndInsertAfter второй по счету(нач. с 1) ставиш - HWND_TOPMOST и все.

[Mephi$topheL]

Пасиб, будем пробовать.

Сообщение от Mephi$topheL

Метод SetFocus() не канает- когда окно под другими окнами, на передний план не выскакивает.

FormStyle = fsStayOnTop тоже не подходит - окно выводится на передний план, но закрепляется поверх всех окон, что крайне нежелательно.

Что делать?

SetForegroundWindow(form1.Handle);// Delphi синтаксис.

[Mephi$topheL]

Так, обо всем по порядку.

Испробованы способы:

SetActiveWindow(MainForm->Handle) - не хочет
SetForegroundWindow(...) - тоже не пашет
SetWindowPos(...) - ни в какую

Но мы не сдаемся и пошли дальше:

SendMessage(MainForm->Handle, WM_ACTIVATE, 0, 0) - ноль эмоций

Какие еще способы остались?

P.S. Заголовочный файл winuser.h подключен.

Сообщение от Mephi$topheL

SetForegroundWindow(...) - тоже не пашет

А из какого состояния, ( minimize , hide) не хочет появляется окно?

SetForegroundWindow(Hwnd) выводит (видимое ,не свернутое) окно на передний план, и делает его активным.

[Mephi$topheL]

Окно банально скрыто под другими окнами - то бишь Application->Active = false;
Не свернуто!
Для этого выполняется проверка WindowState = wsMinimized.
Если окно свернуто - Application->Restore() - кривовато конечно, но эта хрень вроде работает по крайней мере.
Все способы, основанные на WinAPI - принципиально отказываются...

[EvroStandart]

А если попробовать события формы. На пример, Click() ?

[Mephi$topheL]

Можно конечно попробовать...
Но это ж через ж..у, простите.
Непонятно, какого хрена апишные функции работать не хотят.

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

[EvroStandart]

Mephi$topheL:
Непонятно, какого хрена апишные функции работать не хотят.

Может они работают только несколько вместе. У товарища Касперски в книжке был рассмотрен такой случай. При нажатии кнопки срабатывают две или даже три апишные функции подряд. Соответственно их и из кода также вызывать нужно. А по одной из кода - результата никакого.

[Mephi$topheL]

Будем пробовать. Другой альтернативы нет. Спасибо.

Mephi$topheL:
SetForegroundWindow(...) - тоже не пашет

Странно, у меня в скрин-сейвере нареканий не было. Может с хендлом проблемы? Попробуй получить его через GetModuleHandle(0).

[Nerey_ser]

У меня в VB похожая проблема. В винде это называется "программа ожидает ввода информации". В этот момент в строке пуска мигает кнопка. Так?


Если так, то я выхожу слд. образом: Form1.Show. Это не правильно, но работает. Если не срабатывает, можно сделать раз десять

[Mephi$topheL]

Ага, после вызова SetForegroundWindow() действительно моргает кнопка на панели задач. Попробую твой способ, авось поможет...
Альтернатив не так уж много осталось.

[Flexz]

Как переместить окно на передний план?

[Mephi$topheL]

Пасиб, испробуем.

[Mephi$topheL]

Flexz:
Как переместить окно на передний план?

Огромное спасибо, описанный там способ №3 работает!