Спасиб
------------ Дoбавленo в 16.39:
Вот собственно ещё одна проблемка...
По твоей схеме можно произвести только 1 раз разбиение по блока а нужно чтобы было возможно многократное разбиение на блоки...
Add(MainForm,2953706,42,196)
{
Width=914
Height=574
}
Add(StrList,2502544,266,84)
{
Strings=#19:370043,19;3208615,1|19:370040,7;3208632,38|20:370023,87;3208629,94|20:370026,37;3208612,62|19:370043,19;3208615,1|19:369494,03;3208962,6|20:369481,29;3209241,28|19:369334,6;3209234,65|19:369291,6;3209166,17|20:369297,97;3209076,99|19:369356,9;3209030,81|20:369419,18;3208941,89|19:369494,03;3208962,6|
Point(StrToFind)
Point(doGetIndex)
Point(onGetIndex)
}
Add(BlockFind,11728830,266,189)
{
Delete=0
Point(doStartBlock)
Point(doEndBlock)
link(onSearch,3408924:doMessage,[])
link(onEndSearch,2502544:doText,[(310,202)(310,156)(254,156)(254,111)])
link(Text,2502544:Text,[])
}
Add(ArrayCountRepeats,15026260,280,280)
{
link(onCount,469559:doSeparateMT,[(338,286)(338,272)])
link(onEndCount,6474224:doEnum,[(404,293)(404,342)])
link(Array,2502544:Array,[])
}
Add(MT_MultiData,469559,364,266)
{
link(onData1,12971624:doDataOnTrue,[(408,272)(408,279)])
link(onData2,12971624:doCase,[(408,279)(408,272)])
}
Add(Case,12971624,420,266)
{
Value=Integer(2)
Point(doDataOnTrue)
link(onTrue,6264869:doAdd,[])
}
Add(Hub,14129456,231,189)
{
OutCount=3
link(onEvent1,11728830:doStartBlock,[(255,195)(255,202)])
link(onEvent2,11728830:doEndBlock,[(255,202)(255,209)])
link(onEvent3,11728830:doSearch,[(255,209)(255,195)])
}
Add(StrList,6264869,483,273)
{
}
Add(ArrayEnum,6474224,497,336)
{
link(onItem,14129456:doEvent1,[(541,342)(541,268)(219,268)(219,195)])
link(Array,6264869:Array,[])
}
Add(Button,4312423,196,315)
{
Left=70
Top=30
Width=80
Height=25
link(onClick,2124975:doEvent1,[])
}
Add(Hub,2124975,245,315)
{
link(onEvent1,15026260:doCount,[(269,321)(269,286)])
link(onEvent2,6264869:doClear,[(371,328)(371,286)])
}
Add(Message,3408924,343,189)
{
}