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

Активно ли окно?   Найти похожие ветки 

← →
lord Zeratul ©   (2005-07-26 14:35) [0]

Не могу решить следующую задачу: определить стоит ли фокус на окне 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 функцию?! Спасибо!

---

← →
begin...end ©   (2005-07-26 14:39) [1]

GetForegroundWindow ?

---

← →
lord Zeratul ©   (2005-07-26 15:01) [2]

Угу! Спасибо! Заработало! Нужно было внимательней справочник API читать...

---

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

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



Память: 0.45 MB
Время: 0.022 c