Модераторы: diadiavova, gambit
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Узнать хендл активного окна, GetActiveWindow не помогает 
V
    Опции темы
Doff
Дата 15.11.2007, 17:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 15.11.2007

Репутация: нет
Всего: нет
Здравствуйте, уважаемые коллеги!
Я начинающий программист, студент.
В процессе работы над своим проектом у меня возник следующий вопрос:
Как на VB.NET узнать хэндл текущего окна? GetActiveWindow, как я понимаю, позволяет узнать только хэндл окна самой программы. Надо же узнать хэндл активного окна, а по нему узнать: заголовок окна, .exe программы, размеры окна и его положение на экране. Важно то, что хэндл необходимо узнать у окна в фокусе, а не под курсором. Нашел много исходников, но они узнают хэндл под курсором.
Почитав MSDN, узнал, что есть функция GetGUIThreadInfo, но как ей воспользоваться, я не знаю.
У кого-нибудь есть идеи?
PM   Вверх
Baa
Дата 16.11.2007, 17:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 2639
Регистрация: 12.4.2002
Где: Москва

Репутация: нет
Всего: 12
GetForegroundWindow 4 life ;-)


--------------------
"Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande
PM ICQ   Вверх
Doff
Дата 16.11.2007, 19:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 15.11.2007

Репутация: нет
Всего: нет
Спасибо! Заработало кое-как.
Но вопрос до конца не решен: как теперь узнать .exe процесса? Какой API-функцией можно это сделать?
И вопрос на засыпку - где можно достать самый полный список описаний API-функций? Я пользуюсь программой "WinAPI Справочник" с сайта kas-cor.narod.ru, но там не все функции описаны.
PM   Вверх
Baa
Дата 17.11.2007, 00:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 2639
Регистрация: 12.4.2002
Где: Москва

Репутация: нет
Всего: 12
GetWindowModuleFileName ;-)
msdn.microsoft.com


--------------------
"Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande
PM ICQ   Вверх
Doff
Дата 17.11.2007, 16:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 15.11.2007

Репутация: нет
Всего: нет
В MSDN я нашел инфу об этой функции:
"GetWindowModuleFileName & GetModuleFileName Work Only with the Calling Process         
It doesn't work for other processeses on Windows 2000, XP and Vista. See http://support.microsoft.com/?id=228469."
Зато есть функция GetModuleFileNameEx, которая требует прямого указания файла (зачем?).
Так вот, я никак не могу взять в толк, как заставить программу считывать .exe текущего окна. Неужели это такая трудноступная функция?
Baa, за помощь спасибо, но все-таки тема до конца не раскрыта.
PM   Вверх
Baa
Дата 17.11.2007, 23:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 2639
Регистрация: 12.4.2002
Где: Москва

Репутация: нет
Всего: 12
Тогда можно отыскать по процессу. Получим ид процесса по окошку, дальше не сложно smile
GetWindowThreadProcessId


--------------------
"Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande
PM ICQ   Вверх
Walker
Дата 19.11.2007, 10:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 363
Регистрация: 23.10.2006

Репутация: нет
Всего: 16
Цитата

И вопрос на засыпку - где можно достать самый полный список описаний API-функций? Я пользуюсь программой "WinAPI Справочник" с сайта kas-cor.narod.ru, но там не все функции описаны. 

Самая полная информация о Win Platform API в SDK, если Вы решили серьёзно копаться в этом направлении. Для большинства задач обычно вполне хватает ресурса http://pinvoke.net/. Там представлено подробное описание с заточкой под .NET.

Удачи!



--------------------
"От вчерашних побед остаётся усталость, если завтрашний день не сулит ничего..."
PM MAIL   Вверх
Baa
Дата 19.11.2007, 12:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 2639
Регистрация: 12.4.2002
Где: Москва

Репутация: нет
Всего: 12
Вообще, ничего сложного...
Код

IntPtr hWnd = GetForegroundWindow();
uint lpdwProcessId = 0;
GetWindowThreadProcessId(hWnd, out lpdwProcessId);
Console.WriteLine("Process id: {0}", lpdwProcessId);
Console.WriteLine("Process name: {0}", Process.GetProcessById((int)lpdwProcessId).MainModule.FileName);



--------------------
"Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande
PM ICQ   Вверх
Doff
Дата 19.11.2007, 16:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 15.11.2007

Репутация: нет
Всего: нет
Вы меня прямо завалили советами smile Спасибо огромное всем! Буду пробовать... Потом отпишусь о результатах.
PM   Вверх
Doff
  Дата 20.11.2007, 20:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 15.11.2007

Репутация: нет
Всего: нет
Вопрос решен, спасибо всем, кто помог и особенно товарищу Baa за его бескорыстную помощь. Привожу его пример на VB.NET (может, кому пригодится):
Код

Module Module1
    <DllImport("user32.dll", SetLastError:=True)> _
Private Function GetForegroundWindow() As IntPtr
    End Function

    <DllImport("user32.dll", SetLastError:=True)> _
Private Function GetWindowThreadProcessId(ByVal hwnd As IntPtr, _
                          ByRef lpdwProcessId As Integer) As Integer
    End Function

    Sub Main()
        Dim hWnd As IntPtr = GetForegroundWindow()
        Dim lpdwProcessId As Integer = 0
        GetWindowThreadProcessId(hWnd, lpdwProcessId)
        Console.WriteLine(Process.GetProcessById(lpdwProcessId).MainModule.FileName)
    End Sub

End Module


Это сообщение отредактировал(а) Doff - 20.11.2007, 20:34
PM   Вверх
Firster
Дата 28.11.2007, 02:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 73
Регистрация: 16.8.2007
Где: Ukraine

Репутация: нет
Всего: нет
А как быть в такой ситуации, когда, например, известно хендл какого-нить компонента формы и НУЖНО узнать хендл самой формы, чтобы ее спрятать (SW_HIDE). SetForegroundWindow не предлагать. Может какие стандартные функции.....
PM MAIL   Вверх
bom
Дата 27.12.2007, 02:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 329
Регистрация: 22.2.2004
Где: Казахстан, Алматы

Репутация: нет
Всего: 6
GetParent
PM MAIL   Вверх
Firster
Дата 27.12.2007, 03:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 73
Регистрация: 16.8.2007
Где: Ukraine

Репутация: нет
Всего: нет
http://forum.vingrad.ru/forum/topic-184386...y1332636/0.html
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума VB .NET
diadiavova
  • Прежде чем задать вопрос, воспользуйтесь поиском: возможно Ваш вопрос уже обсуждался и на него был получен ответ.
  • Если такой же вопрос не найден, не стоит задавать свой вопрос в любую тему, создайте новую.
  • Заголовок темы должен отображать ее суть.
  • Содержание поста должно описывать проблему понятно, но в то же время, по возможности, лаконично. Сначала следует описать суть вопроса, потом можно привести пример кода, не вынуждайте других участников угадывать в чем Ваша проблема - телепатов здесь нет.
  • Будьте взаимно вежливы и дружелюбны.
  • При оформлении сообщений используйте форматирование, примеры кода заключайте в теги [CODE=vbnet][/CODE].
  • Также ознакомьтесь с общими правилами, действующими на всем форуме.
  • Если вопрос решен, не забывайте помечать тему решенной(вверху темы есть ссылка). Кроме того, если Вы хотите отблагодарить участников, оказавших помощь в решении, можно повысить им репутацию, в случае, если у Вас менее 100 сообщений в форуме и функция изменения репутации Вам недоступна, можете написать сюда.
  • Общие вопросы по программированию на платформе .NET обсуждаются здесь.
  • Литература по VB .NET обсуждается здесь.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, diadiavova.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB .NET | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0842 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.