Add(MainForm,2953706,196,112)
{
}
Add(ArrayRW,8440279,350,182)
{
 link(onRead,6888435:doStrCat,[])
 link(Array,15170179:Array,[])
}
Add(For,1847003,245,182)
{
 End=1
 link(onEvent,1859411:doNext,[])
 link(onStop,6888435:doClear,[])
}
Add(Counter,1859411,294,182)
{
 Max=1
 Type=1
 Default=-1
 link(onNext,8440279:doRead,[])
}
Add(Memo,15170179,336,119)
{
 Left=5
 Top=10
 Strings=#1:1|1:2|
}
Add(Button,4517007,196,182)
{
 Left=70
 Top=10
 link(onClick,1847003:doFor,[])
}
Add(Label,5136207,469,182)
{
 Left=70
 Top=40
}
Add(StrCat,6888435,413,182)
{
 Point(doClear)
 link(onStrCat,5136207:doText,[])
 link(Str1,6888435:Result,[(419,170)(407,170)(407,226)(419,226)])
}