Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Cur Click Добавлено: 05.06.03 11:07  

Автор вопроса:  inc | ICQ: 244202544 

Люди!!! помогите пожалуйста!

Как программно узнать hwnd, на который я нажал?

Спасибо за внимание! 

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 Russian Neo



ICQ: 248318020 

Вопросов: 22
Ответов: 195
  Web-сайт: kazbayev.narod.ru
 Профиль | | #1 		Добавлено: 05.06.03 11:57

Ну попробуй так... Только тебе нужен будет компонент VBcode Cursor ActiveX control. Кажется, я его где-то здесь надыбал. Не найдешь, тогда kazbayev@sibmail.ru (напиши - отправлю). А вообще кидаешь на форму компонент, таймер и усё.

Private Declare Function WindowFromPoint Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long


Dim hnd As Long

Private Sub Timer1_Timer()
Print WindowFromPoint(Cursor1.XPOS, Cursor1.YPOS)

End Sub

Ответить

Номер ответа: 2
Автор ответа:
 ZeroX



ICQ: 220401330 

Вопросов: 47
Ответов: 406
  Профиль | | #2 Добавлено: 05.06.03 12:01

Может и не совсем то, но...

http://www.vb.kiev.ua/code/api/

Смотри text_under_mouse_cursor.zip

Ответить

Номер ответа: 3
Автор ответа:
 Russian Neo



ICQ: 248318020 

Вопросов: 22
Ответов: 195
  Web-сайт: kazbayev.narod.ru
 Профиль | | #3 		Добавлено: 05.06.03 12:08
Ну, согласен, ZeroX прав. Но, по-моему, с компонентом проще..... =)

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам