Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Наведен ли указатель мыши на текстовое поле, в любом приложении системы 
V
    Опции темы
Yura_Matsuk
Дата 29.6.2007, 16:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Есть мысли?
--------------------
Смех смехом, а ОНА кверху мехом...
PM MAIL   Вверх
_hunter
Дата 29.6.2007, 17:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

Репутация: 9
Всего: 98



EnumWindows + EnumChildWindows + GetWindowRect -- найдеш окно, в пределах которого лежит точка.
потом (если нашел такое окно) GetWindowInfo и смотри на WINDOWINFO::atomWindowType (точнее передавай его в GetClassInfo/GetClassInfoEx) если это EDIT/RichEdit/RICHEDIT_CLASS/STATIC -- ты нашел текстовое поле (в принципе это и BUTTON/COMBOBOX/... касается...)


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
MetalFan
Дата 29.6.2007, 17:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

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



WindowFromPoint/ChildWindowFromPoint  может поможет?

Это сообщение отредактировал(а) MetalFan - 29.6.2007, 17:48


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
W4FhLF
Дата 30.6.2007, 06:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


found myself
****


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

Репутация: 6
Всего: 121



MetalFan, +1

WindowFromPoint + GetClassName

Потом сравнивай со стандартными текстовыми классами(Edit, TEdit, TMemo, ThunderTextBox etc). 


--------------------
"Бог умер" © Ницше
"Ницше умер" © Бог
PM ICQ   Вверх
Yura_Matsuk
Дата 30.6.2007, 16:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Еще раз здраствуйте.
Код

program Project2;
{$APPTYPE CONSOLE}
uses windows,controls,dialogs;
var
 C:array[0..100] of AnsiChar;
 hw:HWND;
 s:string;
begin
 while true do begin
  hw:=windowfrompoint(mouse.CursorPos);
  getclassname(hw,@C,100);
  s:=string(C);
  writeln(s);
  sleep(1000);
 end;
end.

Но при наведении, скажем, на IE он так и говорит, что это Internet Explorer Server.
А нужно, чтобы прога и там поля распознавала.
То же касается и MSWord и пр.
Заранее спасибо.
--------------------
Смех смехом, а ОНА кверху мехом...
PM MAIL   Вверх
W4FhLF
Дата 1.7.2007, 06:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


found myself
****


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

Репутация: 6
Всего: 121



Yura_Matsuk, так там уже нет никаких стандартных контролов, там массив COM интерфейсов, OLE контейнеров и прочих страшных и непонятных вещейsmile Чтобы получать эти интерфейсы надо работать из контекста этого приложения, т.е. как минимум тебе придётся внедрять DLL, да и потом с иерархией скорее всего запутаешься, если с COM не знаком. Могу показать тебе пример перебора в TwebBrowser(или найди на форуме, код приводился), когда он находится на твоей же форме, ты можешь скомпилировать и посмотреть фо что это превратиться, там без бутылки не разберёшьсяsmile Ещё можно перехватывать CoCreateInstanse и иже с ними, чтобы сразу получить нужный интерфейсы, но тогда придётся внедряться во все приложении при запуске системы. 
В общем задача становится довольно непростой. Скажи, какую проблему ты хочешь решить? Может мы подберём что-нибудь попроще. И ещё, есть ли программы аналоги той, которую ты хочешь написать? 


--------------------
"Бог умер" © Ницше
"Ницше умер" © Бог
PM ICQ   Вверх
Yanis
Дата 1.7.2007, 10:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 13
Всего: 111



Yura_Matsuk
Пойми, что я могу и у кнопки выставить «текстовый» курсор. И ты будешь потом в форуме говорить, что надо бы и там отлавливать. Можно также всё что угодно нарисовать у выставить у этого псевдо контрола «текстовый» курсор…


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
Yura_Matsuk
Дата 1.7.2007, 11:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Всем спасибо за ответы. Сетуацию разъяснили.
--------------------
Смех смехом, а ОНА кверху мехом...
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




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


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

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