| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Активно ли окно? [D5, D6, D7, Win95/98, Win2k, WinXP]
lord Zeratul © (2005-07-26 14:35:00)Не могу решить следующую задачу: определить стоит ли фокус на окне WinAmp или нет (т.е. активен ли WinAmp). Для этих целей реализовал функцию, которая в случае успеха фозвращает true:
function TFormMain.WinAmpVisible:boolean;
var
Handle: HWND;
lpRect:boolean;
begin
lpRect:=false;
Handle:=FindWindow('Winamp v1.x',nil);
if Handle<>0 then
begin
if GetFocus=Handle then lpRect:=true;
end;
Result:=lpRect;
end;
А по нажатию кнопки на форме, например:
if WinAmpVisible=true then Label1.Caption:='Active'
else Label1.Caption:='Not active'
И ето нот воркинг!!! В чём дело? Возможно вызываю не ту API функцию?! Спасибо!
lord Zeratul (2005-07-26 15:01:00) [1]Угу! Спасибо! Заработало! Нужно было внимательней справочник API читать...
begin...end (2005-07-26 14:39:00) [2]GetForegroundWindow ?
| |
