Вверх ↑
Ответов: 274
Рейтинг: 47
#1: 2011-01-20 20:26:55 ЛС | профиль | цитата
178.123.243.230, Ну можно так
code_22239.txt

При нажатии на клавишу Ctrl она меняется на Enter (можно проверить в блокноте)
------------ Дoбавленo в 20.26:
178.123.243.230, Ну можно так
Add(MainForm,2953706,21,105)
{
}
Add(KeyHook,1819679,182,140)
{
Point(doKillKey)
link(onKeyDown,13807820:doCase,[])
link(onKeyUp,9245159:doCase,[(265,153)(265,181)])
}
Add(KeyEvent,9737814,462,168)
{
link(Handle,1819679:Handle,[(468,156)(438,156)(438,215)(188,215)])
link(Code,12578187:Value,[])
}
Add(Case,13807820,280,140)
{
Value=Integer(17)
link(onTrue,9200626:doEvent1,[])
}
Add(Case,9245159,280,175)
{
Value=Integer(17)
link(onTrue,8471889:doEvent1,[])
}
Add(Memory,12578187,469,112)
{
Default=Integer(13)
}
Add(Hub,9200626,329,147)
{
link(onEvent1,9737814:doPressDown,[(415,153)(415,181)])
link(onEvent2,2054913:doWork2,[])
}
Add(Hub,8471889,329,182)
{
link(onEvent1,9737814:doPressUp,[])
link(onEvent2,2054913:doWork3,[(376,195)])
}
Add(HubEx,2054913,372,154)
{
Angle=3
link(onEvent,1819679:doKillKey,[(376,125)(169,125)(169,146)])
}


При нажатии на клавишу Ctrl она меняется на Enter (можно проверить в блокноте)
карма: 0

0
файлы: 1code_22239.txt [860B] [142]