Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

узнать, перекрыто ли окно частично другими окнами или свернуто   Найти похожие ветки 

 
Tack   (2005-08-17 14:42) [0]

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

Как узнать, что окно с данным HWND перекрыто другими окнами на экране или минимизировано/спрятано? Если окно не перекрыто, а просто неактивно, то ничего делать не надо.

Хотелось бы написать одну булевскую функцию типа WantMessage, которая принимает только HWND. Подскажите, может есть готовые в API или VCL


 
DVM ©   (2005-08-17 14:44) [1]


> или минимизировано/спрятано

IsIconic()


 
Tack   (2005-08-17 14:54) [2]

спасибо. А как насчет "частично перекрыто"?


 
Leonid Troyanovsky ©   (2005-08-17 14:57) [3]


> Tack   (17.08.05 14:42)  

> Как узнать, что окно с данным HWND перекрыто другими окнами
> на экране или минимизировано/спрятано? Если окно не перекрыто,
> а просто неактивно, то ничего делать не надо.


Find windows that may cover another window.

Var
 hW: HWnd;
 r: TRect;
begin
 hw := Handle;
 While IsWindow(hw) Do Begin
   hw := GetWindow( hw, GW_HWNDPREV );
   If IsWindowVisible(hw) and not IsIconic( hw ) Then Begin
     ... use GetWindowRect( hw, r ) to get candidate windows
     rect and check if it intersects the forms BoundsRects via
     IntersectRect
   End;
 End;
end;

Peter Below (TeamB)  100113.1...@compuserve.com)

--
Regards, LVT.


 
Tack   (2005-08-17 15:00) [4]

всем спасибо, вопрос закрыт.



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

Текущий архив: 2005.10.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.066 c
1-1127735165
DelphiLexx
2005-09-26 15:46
2005.10.16
Растягивание TPanel через ScrollBar


5-1103275206
VIS
2004-12-17 12:20
2005.10.16
Свойство фонт в меню


1-1127494403
злобная танька
2005-09-23 20:53
2005.10.16
Инициализация массива


2-1125789112
Пантелеев Иван
2005-09-04 03:11
2005.10.16
Подсчёт выбраных записей


14-1127233665
ocean
2005-09-20 20:27
2005.10.16
Бывает ли такое?