Вверх ↑
Ответов: 871
Рейтинг: 322
#1: 2019-06-19 17:46:20 ЛС | профиль | цитата
Потребовалось сложение и вычитание двух неравнозначных массивов. Может есть более хитропопый вариант?

Add(MainForm,2953706,504,238)
{
Width=157
Height=361
link(onCreate,11195374:doData,[])
}
Add(ListBox,3195096,686,168)
{
Left=5
Top=5
Width=35
Height=70
Strings=#1:5|2:10|2:20|
}
Add(ListBox,6356249,889,168)
{
Left=45
Top=5
Width=40
Height=290
Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|2:11|2:12|2:13|2:14|2:15|2:16|2:17|2:18|2:19|2:20|2:21|2:22|
}
Add(Button,8351967,791,245)
{
Left=30
Top=305
Caption="+"
link(onClick,3229555:doFor,[])
}
Add(CounterEx,14688697,658,245)
{
Default=-1
Point(doMax)
link(onNext,7800218:doRead,[])
}
Add(DoData,11195374,553,252)
{
link(onEventData,2842889:doOperation,[])
link(Data,3195096:Count,[(559,222)(699,222)])
}
Add(ArrayRW,7800218,700,245)
{
link(Array,3195096:Array,[])
}
Add(Math,2842889,602,252)
{
OpType=1
Op2=1
link(onResult,14688697:doMax,[])
}
Add(For,3229555,847,245)
{
link(onEvent,9664792:doRead,[])
link(End,6356249:Count,[(860,222)(902,222)])
}
Add(ArrayRW,9664792,903,245)
{
link(onRead,1863989:doEvent1,[])
link(Array,6356249:Array,[])
}
Add(Hub,1863989,945,245)
{
link(onEvent1,14688697:doNext,[(969,251)(969,234)(646,234)(646,251)])
link(onEvent2,13419134:doString,[(971,258)(971,293)(884,293)(884,328)])
}
Add(ListBox,16625279,966,322)
{
Left=90
Top=5
Width=50
Height=290
}
Add(FormatStr,13419134,896,322)
{
Mask="%1 + %2"
link(onFString,16625279:doAdd,[])
link(Str1,7800218:Item,[(902,303)(706,303)])
link(Str2,9664792:Item,[])
}

карма: 1

0