Вверх ↑
Ответов: 3889
Рейтинг: 362
#1: 2011-05-04 13:23:46 ЛС | профиль | цитата
Самый суровый перехватчик правой кнопки мыши и клавиши "контекстное меню" на клавиатуре. Не только убирает меню, но и подменяет его своим! ))


Add(MainForm,8431895,245,273)
{
Point(onKeyDown)
Point(Handle)
Point(doSetFocus)
Point(doSendToBack)
Point(doBringToFront)
Point(doCenterPos)
link(onActivate,7704589:doTimer,[])
link(onDeactivate,7704589:doStop,[])
}
Add(WebBrowser,10275324,322,196)
{
Left=685
Top=115
Align=5
URL="ya.ru"
Point(Handle)
Point(onKeyDown)
Point(onKeyUp)
Point(onMouseUp)
}
Add(Timer,7704589,294,273)
{
Interval=1
link(onTimer,15572511:doEvent1,[])
}
Add(Keyboard,13078062,378,273)
{
Key=2
link(onReadKey,4604706:doWork2,[])
}
Add(IndexToChanel,14195010,434,273)
{
link(onEvent2,6544023:doPopupHere,[])
}
Add(Hub,15572511,343,273)
{
link(onEvent1,13078062:doReadKey,[])
link(onEvent2,9258898:doReadKey,[(362,286)(370,314)])
}
Add(Keyboard,9258898,378,308)
{
Key=93
link(onReadKey,4604706:doWork3,[(417,314)])
}
Add(HubEx,4604706,413,273)
{
link(onEvent,14195010:doEvent,[])
}
Add(PopupMenu,6544023,476,280)
{
Menu=#20:У меня меню нет ))
}


Круче только глобальный хук, о котором я писал выше)
карма: 1

1
Голосовали:MAV