Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2017.07.09;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "WinAPI";
Текущий архив: 2017.07.09;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.001 c
6-1283427469
dmitrynpk
2010-09-02 15:37
2017.07.09
Ограничение доступа к Серверу на TIdTCPServer


2-1445034926
shkolnik
2015-10-17 01:35
2017.07.09
Задача по программированию


15-1463750462
Кто б сомневался
2016-05-20 16:21
2017.07.09
IActiveScript в Delphi (создание Msxml2.DOMDocument в vbs = AV)


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


1-1352355762
Дмитрий Белькевич
2012-11-08 10:22
2017.07.09
Ищу дефолтный library path для xe3.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский