Активно ли окно?

← →
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 ?

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

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