Вниз
Скачать: CL | DM;

Потерять фокус   Найти похожие ветки 

← →
Kns   (2007-09-03 15:28) [0]

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

Application.MainForm.SendToBack;
h:=GetTopWindow(0);
Windows.SetFocus(h);

Приложение уходит но фокус не отдает. Почему?


← →
Сергей М. ©   (2007-09-03 15:36) [1]


> Почему?
>


Вероятно потому что h = 0


← →
Kns   (2007-09-03 15:42) [2]

Нет. H<>0.
вообще опытным путемя выяснил что вместо
Windows.SetFocus(h);
нужно использовать
SetForegroundWindow(h);
Тогда фокус уходит но кому отдается не видно.
Я предпологаю что GetTopWindow(0) возвращает хендл невидмого окна.


← →
Сергей М. ©   (2007-09-03 15:49) [3]


> опытным путемя выяснил что вместо
> Windows.SetFocus


И зачем эспериментировать, если логика работы обеих ф-ций описана в справке ?


> предпологаю что GetTopWindow(0) возвращает хендл невидмого
> окна


Это вряд ли)


← →
Kns   (2007-09-03 16:03) [4]

Ну насчет SetFocus ошибся не обратил внимания, что в MSDN сказано
The window must be attached to the calling thread"s message queue.
А в остальном вопрос тотже.


h:=GetTopWindow(0);
if h<>0 then
 begin
 Application.MainForm.SendToBack;
 SetForegroundWindow(h);
 end;

Не активирует приложение лежащее сверх.


← →
Сергей М. ©   (2007-09-03 16:14) [5]

Возьми на вооружение SpyXX и посмотри что это за окно h


← →
Lacmus ©   (2007-09-03 16:39) [6]

>Kns   (03.09.07 15:28)  

Application.Minimize ?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
2-1208704632
No_Dead
2008-04-20 19:17
2008.05.18
Банальная оптимизация(или около этого)


15-1207544272
Игорь Шевченко
2008-04-07 08:57
2008.05.18
McSimm, с днем рождения!


2-1208335672
Armond
2008-04-16 12:47
2008.05.18
Запрос


2-1208335003
Andy BitOff (PPC)
2008-04-16 12:36
2008.05.18
Быстрое определение валидности Excel евского файла


3-1197624704
novill
2007-12-14 12:31
2008.05.18
IB 7.5 Размер страницы.




   Наверх