Вверх ↑
Ответов: 786
Рейтинг: 168
#1: 2022-04-28 14:09:38 ЛС | профиль | цитата
Мой варивант
Add(MainForm,3824534,406,98)
{
Width=880
Height=526
}
Add(Button,8467833,574,168)
{
Left=5
Top=10
Width=125
Caption="Открыть список"
link(onClick,4767590:doExecute,[])
}
Add(CheckBox,10547583,630,217)
{
Left=10
Top=70
Width=120
Caption="Случайный порядок"
}
Add(Edit,7065250,518,175)
{
Left=65
Top=40
Width=25
Text="5"
DataType=2
ClearAfterEnter=1
link(onEnter,5122062:doEvent1,[(563,188)(563,165)(452,165)(452,230)])
}
Add(Label,10823011,469,98)
{
Left=10
Top=45
Width=53
Height=17
Caption="Интервал"
}
Add(Label,5324941,518,98)
{
Left=95
Top=45
Width=25
Height=17
Caption="сек."
}
Add(Button,15230804,413,231)
{
Left=5
Top=100
Width=125
Caption="Начать выборку"
link(onClick,5122062:doEvent2,[])
}
Add(ListBox,9901049,756,140)
{
Left=20
Top=175
Width=130
Height=305
Strings=#5:ya.ru|10:google.com|9:hiasm.com|
DataType=1
Point(doLoad)
Point(doSelect)
Point(onSelect)
Point(EndIdx)
link(onSelect,1507637:doNavigate,[])
}
Add(ODialog,4767590,630,168)
{
Filter="Текстовый документ|*.txt"
link(onExecute,13127934:doEvent1,[])
}
Add(Hub,13127934,679,168)
{
link(onEvent1,9901049:doLoad,[])
link(onEvent2,2134394:doData,[(704,181)(704,237)])
}
Add(DoData,2134394,777,231)
{
link(onEventData,542141:doMax,[])
link(Data,7449360:Var2,[])
}
Add(Button,11849292,413,273)
{
Left=5
Top=125
Width=125
Caption="Стоп"
link(onClick,15352547:doStop,[])
}
Add(WebBrowser,1507637,840,154)
{
Left=164
Width=700
Height=487
Align=3
URL=""
}
Add(Timer,15352547,574,266)
{
Interval=0
Enable=1
Point(doInterval)
link(onTimer,1620092:doEvent,[])
}
Add(Hub,5122062,462,224)
{
InCount=2
link(onEvent1,8356632:doOperation,[])
link(onEvent2,15352547:doTimer,[(501,237)(501,272)])
}
Add(CounterEx,542141,847,224)
{
Max=2
Default=-1
Point(doMax)
Point(doReset)
Point(onThroughMax)
link(onNext,9718124:doWork1,[(893,230)(893,279)])
link(onThroughMax,542141:doReset,[(886,237)(886,265)(837,265)(837,244)])
}
Add(IndexToChanel,1620092,630,266)
{
Point(Index)
link(onEvent1,542141:doNext,[(828,272)(828,230)])
link(onEvent2,12809008:doRandom,[])
link(Index,10547583:Checked,[])
}
Add(Math,8356632,511,224)
{
OpType=2
Op1=1000
ResultType=0
link(onResult,15352547:doInterval,[(550,230)(550,286)])
link(Op2,7065250:Text,[])
}
Add(Random,12809008,686,273)
{
Max=3
Point(Max)
link(onRandom,9718124:doWork2,[])
link(Max,7449360:Var1,[(692,215)])
}
Add(GetDataEx,7449360,777,210)
{
link(Data,9901049:EndIdx,[])
}
Add(HubEx,9718124,735,273)
{
Angle=3
link(onEvent,9901049:doSelect,[(739,181)])
}

карма: 15

1
Голосовали:Serascer
Редактировалось 1 раз(а), последний 2022-04-28 14:14:20