Вверх ↑
Ответов: 537
Рейтинг: 14
#1: 2023-08-29 11:30:02 ЛС | профиль | цитата
В справке есть готовый код

Add(MainForm,3662738,287,189)
{
Left=20
Top=105
Width=93
Height=55
Caption="Code_Key"
BorderStyle=4
Point(Handle)
link(onCreate,1836759:doPopup,[(331,209)(331,233)(275,233)(275,258)])
}
Add(Timer,1020196,287,140)
{
Interval=10
link(onTimer,12421531:doEvent1,[])
}
Add(Keyboard,10463908,406,140)
{
Key=35
}
Add(ArrayEnum,14390339,406,189)
{
link(onItem,13824301:doEvent,[])
link(Array,10463908:Keys,[])
}
Add(ChangeMon,656270,511,196)
{
link(onData,2743265:doText,[])
}
Add(IndexToChanel,13824301,462,189)
{
Point(Data)
link(onEvent2,656270:doData,[])
link(Data,14390339:Index,[(468,177)(444,177)(444,233)(419,233)])
}
Add(Hub,12421531,336,140)
{
link(onEvent1,10463908:doReadKey,[])
link(onEvent2,14390339:doEnum,[(387,153)(387,195)])
}
Add(Label,2743265,560,196)
{
Width=87
Height=31
Align=5
Font=[MS Sans Serif,24,1,0,1]
Caption="0"
AutoSize=1
Alignment=2
}
Add(WinTools,1836759,287,245)
{
link(Handle,3662738:Handle,[])
}

карма: 4

0