Фокус окна

[chingiz]

Сообщение от Лёка

а вдруг не эдит, дргуие элементы? надо форму

Ну у формы тоже такое свойство есть, можно наверное попробовать - да?

[Квэнди]

Опять распыляемся....
Вопрос:
Лёка

Как определить, окно имеет фокус или нет? Если окно приняло фокус делать то то, если потеряло, делать то то. Знаю что функция SetForegroundWindow(Handle) делает окно активным. Но как обратится как к своиству

Ответ:
rpy3uH

пример с GetForegroundWindow:

view plaincopy to clipboardprint?
  
function IsWindowInFocus(WND:HWND):boolean;   
begin   
  Result:=GetForegroundWindow=WND;   
end;   
  
.....//где-нибудь в коде ..........   
  if IsWindowInFocus(FindWindow(nil,'Мой компьютер')) then ShowMessage('оно активно!!!');