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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Глобальный отлов окон, хук или что? 
:(
    Опции темы
dee63
Дата 19.1.2008, 21:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



День\вечер\ночь добрый!
Дорогое эксперты, и не очень эксперты, вот сталкнулся с еще одной проблемой.
Имеется программа, суть ее:отловить окно и надругаться над ним и программой, его порождающей.
есть функция, выполняющая сей замысел. но работает она либо один раз, либо с таймером по двум вариантам: через определенное время и постоянно. причем вариант с выполнением через опеределенное время выполняет действия через, скажем, 10 сек, дальше-не выполняет. А хочецца чтоб работало всегда, при этом не загружая сиситему. Функция делает перебор окон и ищет вхождение в заголовок слов.
Вот задумался над тем, как сделать так чтоб при создании ЛЮБОГО окна проверялся его заголовок.
Пошелв сторону создания хука-так нифига и не понял как его делать(
Может кто подскажет как еще можно сделать, ну в плане не через хук.
или может кто поделится ссылочкой на уже написаный хук.
сам конечно сижу разбираюсь но чот пока результата мало smile 
PM MAIL WWW ICQ   Вверх
MetalFan
Дата 19.1.2008, 22:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Цитата(dee63 @  19.1.2008,  21:32 Найти цитируемый пост)
ошелв сторону создания хука-так нифига и не понял как его делать(

разбирайся - материалов полно.

Цитата(dee63 @  19.1.2008,  21:32 Найти цитируемый пост)
сам конечно сижу разбираюсь но чот пока результата мало

плохой результат - тоже результат.
давай, код, что уже сделал, но не работает - наставим на путь истинный... а с нуля за тебя никто писать не будет


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


Опытный
**


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

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



Попробуй так:
Код

...
  while true do
  begin
    EnumWindows(@EnumWindowesWnd,0);   //находиш окно и делаеш с ним че надо
    h := CreateEvent(nil,true,false,'');
    ...
    WaitForSingleObject(h,1000);                      //а сдесь ждеш 1000мсек
    CloseHandle(h);
  end;
...


Работает одноздначно и систему не грузит
PM MAIL ICQ   Вверх
MetalFan
Дата 20.1.2008, 01:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Ofer, нафига эвент??? чем sleep не угодил?


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
dumb
Дата 20.1.2008, 04:08 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


sceloglauxalbifacies
****


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

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



о. это индийский Sleep! smile
PM MAIL   Вверх
Rennigth
Дата 20.1.2008, 13:21 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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



Цитата(dumb @  20.1.2008,  04:08 Найти цитируемый пост)
о. это индийский Sleep!  

 smile 


Цитата(MetalFan @  20.1.2008,  01:43 Найти цитируемый пост)
Ofer, нафига эвент??? чем sleep не угодил? 

а я вообще не понял смысла данного кода...  smile 


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
Ofer
Дата 20.1.2008, 16:14 (ссылка)  | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



MetalFan, это ведь одидн из вариантов.
А со слипом у меня когада-то давно чет не вышло, вобщем я на него обиделся smile
PM MAIL ICQ   Вверх
MetalFan
Дата 20.1.2008, 17:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Цитата(Ofer @  20.1.2008,  16:14 Найти цитируемый пост)
А со слипом у меня когада-то давно чет не вышло, вобщем я на него обиделся

несерьезно для программиста утверждение)


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


Опытный
**


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

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



MetalFan, прошу заметить - который только учиться smile к тому же, даже не на программиста
PM MAIL ICQ   Вверх
dee63
Дата 26.1.2008, 22:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Цитата(Ofer @  20.1.2008,  16:14 Найти цитируемый пост)
А со слипом у меня когада-то давно чет не вышло, вобщем я на него обиделся 

аналогично. не хочет работать паразит!
мтяк, разбираимся потихонечку)
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "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.

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


 




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


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

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