Форум по программированию Delphi Sources

 



Вернуться   Форум по программированию Delphi Sources > Все о Delphi > Разное
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 15.08.2019, 15:38
ale-sumkin ale-sumkin вне форума
Прохожий
 
Регистрация: 15.08.2019
Сообщения: 1
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Форма поверх работает неправильно

Доброго времени суток! Может подскажет кто, я уж не знаю как еще сделать
Есть приложение, в нем вызываю периодически форму через .Show, у нее установлено FormStyle := fsStayOnTop;

еще ей делаю вот так что бы она была поверх окон Windows
SetWindowLong(Handle, GWL_HWNDPARENT, GetDesktopWindow);
SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE or SWP_NOMOVE);

все работает нормально, но есть еще одна форма, которая вызывается через Show() и у неё тоже FormStyle := fsStayOnTop;

и вот если открыт к примеру Chrome, ну или любое приложение, и срабатывает первая форма, то сразу на экране появляется все приложение, причем по Alt+Tab переключиться проблематично, Chrome как бы активный но на заднем плане

пробовал перед вызовом первой формы получать Handle активного окна, и после открытия делать активным приложение которое было активно, но все равно не работает так как нужно
Ответить с цитированием
  #2  
Старый 18.08.2019, 08:52
Аватар для Vayrus
Vayrus Vayrus вне форума
Исполняемый Ретровирус
 
Регистрация: 09.08.2008
Адрес: Umbrella Corporation
Сообщения: 744
Репутация: 1293
По умолчанию

А если процедуру установки поверх всех окон воткнуть в таймер?
Ответить с цитированием
Ответ



Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 08:07.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources", 2004-2019

ВКонтакте   Facebook   Twitter