Вверх ↑
Ответов: 2193
Рейтинг: 673
#1: 2019-06-12 20:48:32 ЛС | профиль | цитата
Vandjer, как вариант:

Add(MainForm,2953706,287,336)
{
Position=1
}
Add(StrList,9502157,378,259)
{
Strings=#51:№Команда1. 1тайм"2" 2тайм"1"; разный текст|53:№Команда2. 1таймГ"1" 2таймГ"0"; разный текст|
}
Add(Button,15328603,336,336)
{
Left=25
Top=5
link(onClick,14783413:doEnum,[])
}
Add(ArrayEnum,14783413,392,336)
{
link(onItem,4574161:doCompare,[])
link(Array,9502157:Array,[])
}
Add(StrMask,4574161,434,336)
{
Mask="*команда1*"
link(onFalse,8287533:doSearch,[])
link(onTrue,1522185:doSearch,[(481,349)(481,405)])
AddHint(-13,-47,73,13,Mask)
}
Add(BlockFind,8287533,483,336)
{
IncludeBlock=1
StartBlock="""
EndBlock="""
link(onSearch,9641890:doOperation,[(545,342)(545,293)])
link(onEndSearch,3646762:doStrCat,[])
}
Add(RichEdit,5282022,651,448)
{
Left=10
Top=40
Width=735
Height=315
ScrollBars=1
}
Add(BlockFind,1522185,483,399)
{
IncludeBlock=1
StartBlock="""
EndBlock="""
link(onSearch,6222466:doOperation,[])
link(onEndSearch,13366684:doStrCat,[(541,412)(541,454)])
}
Add(Math,6222466,574,399)
{
ResultType=0
Point(doDefault)
link(Op1,10058599:Var1,[(580,387)(571,387)(571,439)])
}
Add(StrCat,13366684,567,448)
{
Str1="Забил: "
link(onStrCat,2570340:doWork2,[])
link(Str2,10058599:Var2,[])
}
Add(GetDataEx,10058599,574,434)
{
link(Data,6222466:Result,[])
}
Add(Math,9641890,574,287)
{
ResultType=0
Point(doDefault)
link(Op1,4419340:Var1,[(580,275)(571,275)(571,327)])
}
Add(GetDataEx,4419340,574,322)
{
link(Data,9641890:Result,[])
}
Add(StrCat,3646762,567,343)
{
Str1="Пропустил: "
link(onStrCat,2570340:doWork1,[(634,349)])
link(Str2,4419340:Var2,[])
}
Add(HubEx,2570340,630,448)
{
link(onEvent,5282022:doAdd,[])
}
И некоторые замечания по вашей схеме:
1. Компонент EventFromData так не используется, вместо него используйте Memory(Память) в вкладке Инструменты.
2. Данные передаются в потоке (по связи слева на право), не обязательно подавать сверху.
карма: 10

0