Исходники: Delphi, Hooks, Компоненты

Добавил: cj (20-06-2007)	Просмотреть Скачать
CjHooksDTT Мой компонент написанный из-за того, что мне ненравилось, когда при глобальном хуке надо писать DLL. Для XP можно не писаль DLL для НИЗКОУРОВНЕВОГО глобального хука, но все эти варианты были слишком нудными. С самого начала моей перехватческой деятельности я поставил цели: 1. Код как можно короче, понятнее и проще. 2. Только один исполняемый файл программы, без всяких DLL. 3. Возможность перехвата в windows: 98, 2000, XP, VISTA Узнал про процедуру GetKeyState (кстати, она основа моего компонента) и решил организовать цикл с ней. Компонент осуществляет перехват клавиш с 1 по 255, то есть практически все (scan-коды) клавиши. Там же в юните сделал список констант всех клавиш (по рисункам кнопок на своей клавиатуре). События: OnKeyDown, OnKeyPress, OnKeyUp. Недоработки: при событии OnKeyPress: например в блокноте: нажата,задержка,нажата,нажата,нажата.... а при этом событии в компоненте: нажата,нажата,нажата... То есть нету задержки, буду работать над этим. Лучше сделать интервал сканирования маленьким а то будут <пробелы> нажатий если Юзверь будет быстро тыкать. Ну в общем побольше отзывов, комментов, поправок и предложений по поводу компонента пишите здесь или мне на мыло StrToInt@mail.ru ps Для работы ниже, чем XP, лучше переделать под виндовый таймер.
Delphi, Hooks, Компоненты	2 кб

$ADV

Исходники: Delphi [X], Hooks [X], Компоненты [X]