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

Вниз

узнать, находится ли фокус ввода в окне или нет...   Найти похожие ветки 

 
istok   (2010-08-16 17:54) [0]

есть handle (hwnd) окна (вернее это edit контрол), нужно узнать, находится ли оно в фокусе ввода или нет


 
istok   (2010-08-16 17:59) [1]

PS: GetForegroundWindow возвращает хендл родительского окна, а мне надо знать, в фокусе ли конкретное поле ввода..


 
Anatoly Podgoretsky ©   (2010-08-16 19:58) [2]

> istok  (16.08.2010 17:59:01)  [1]

В первом приближение GetCaretPos


 
Игорь Шевченко ©   (2010-08-16 23:32) [3]

GetFocus = hwnd


 
Leonid Troyanovsky ©   (2010-08-17 07:51) [4]


> istok   (16.08.10 17:54)  

GetGUIThreadInfo Function

--
Regards, LVT.


 
istok   (2010-08-30 13:54) [5]


> GetGUIThreadInfo Function


что-то она у меня не работает, возвращает false и 87ой getlasterror, что значит invalid parameter..:

procedure TForm1.btnRefreshClick(Sender: TObject);
var
 lpgui: tagGUITHREADINFO;
begin
lbIEURL.Clear;

if GetGUIThreadInfo(2320, lpgui) then
begin
  lbIEURL.Items.Add("active "+inttostr(lpgui.hwndActive) + " " + GetWndClass(lpgui.hwndActive));
  lbIEURL.Items.Add("focus "+inttostr(lpgui.hwndFocus) + " " + GetWndClass(lpgui.hwndFocus));
  lbIEURL.Items.Add("caret "+inttostr(lpgui.hwndCaret) + " " + GetWndClass(lpgui.hwndCaret));
end
else
  lbIEURL.Items.Add(IntToStr(GetLastError));


значение thread id 2320 взял из process explorer, это же значение получаю через  GetWindowThreadProcessId, т.е. такой поток точно есть в системе..


 
Leonid Troyanovsky ©   (2010-08-30 14:45) [6]


> istok   (30.08.10 13:54) [5]

http://msdn.microsoft.com/en-us/library/ms633506(VS.85).aspx

Note that you must set the cbSize member to sizeof(GUITHREADINFO)
before calling this function.

--
Regards, LVT.


 
istok   (2010-08-30 15:10) [7]

ах-ах, читал же мсдн и пропустил это предложение((  спасибо!!!!!!!!



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

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

Наверх




Память: 0.48 MB
Время: 0.004 c
4-1282815533
RG
2010-08-26 13:38
2017.07.09
в Windows7 не работает IsWindowVisible


2-1444454791
steremin
2015-10-10 08:26
2017.07.09
MS Access ошибка при открытии файла!


2-1445006653
AndrG
2015-10-16 17:44
2017.07.09
constant expression violates subrange bounds


6-1283385235
Gu
2010-09-02 03:53
2017.07.09
Определение региона по ip


2-1444440112
Е95
2015-10-10 04:21
2017.07.09
Как можно экспортировать функцию по EntryPoint (ordinal)?