------------ Дoбавленo:
конечно можно реализовать и так, но так муторно, и может очень сильно проц бить
Add(MainForm,2953706,21,105)
{
link(onCreate,2341749:doEvent1,[])
}
Add(Thread,8289253,154,189)
{
Delay=100
link(onExec,4167939:doEnum,[])
}
Add(EnumProcess,3547669,196,119)
{
link(onProcess,14946548:doWork2,[])
}
Add(StrList,12694503,266,119)
{
}
Add(Hub,2341749,70,119)
{
link(onEvent1,3547669:doEnum,[])
link(onEvent2,8289253:doStart,[(128,132)(128,195)])
}
Add(ListBox,15374719,441,238)
{
Left=5
Top=5
Width=385
Height=265
}
Add(EnumProcess,4167939,196,189)
{
link(onProcess,846743:doValue,[])
}
Add(ArrayEnum,1389886,280,189)
{
onBreakEnable=0
link(onItem,12360026:doCompare,[])
link(onEndEnum,173117:doData,[(324,202)(324,244)])
link(Array,12694503:Array,[])
}
Add(Memory,846743,238,189)
{
link(onData,1389886:doEnum,[])
}
Add(If_else,12360026,322,189)
{
link(onTrue,1389886:doStop,[(366,195)(366,199)(268,199)(268,202)])
link(Op1,14248205:Var3,[(328,177)(296,177)(296,233)])
}
Add(DoData,173117,336,238)
{
link(onEventData,15833363:doEvent1,[])
link(Data,14248205:Var2,[(342,226)(321,226)(321,249)(258,249)])
}
Add(GetDataEx,14248205,245,224)
{
Angle=3
link(Data,846743:Value,[(244,233)])
}
Add(Hub,15833363,378,238)
{
link(onEvent1,15374719:doAdd,[])
link(onEvent2,14946548:doWork3,[(422,251)(422,191)(249,191)])
}
Add(HubEx,14946548,245,112)
{
link(onEvent,12694503:doAdd,[])
}