
Куда у тебя For идет, в воздух, что ли (еще и выход замаскировал


------------ Дoбавленo:
А чего вот так не сделать

Add(MainForm,13208829,301,294)
{
Width=574
}
Add(Memo,12980789,441,357)
{
Left=3
Top=50
Width=715
Height=500
Point(SelText)
link(FileName,4942225:Value,[])
}
Add(Button,5171328,322,483)
{
Left=6
Top=25
Width=225
Font=[Courier New,10,0,0,204]
Caption="ПЕЧАТЬ ВЫДЕЛЕННОГО ТЕКСТА"
link(onClick,13452048:doFor,[])
}
Add(Hub,642401,371,294)
{
OutCount=5
link(onEvent2,4942225:doValue,[])
link(onEvent3,12980789:doLoad,[(424,314)(424,391)])
}
Add(Memory,4942225,448,301)
{
}
Add(Printer,2239600,462,483)
{
link(Text,12980789:SelText,[])
}
Add(UpDown,1719156,322,420)
{
Left=535
Top=20
Height=25
Min=1
Position=1
link(onPosition,9900896:doText,[])
}
Add(Label,16720928,301,252)
{
Left=335
Top=25
Width=121
Height=17
Caption="КОЛИЧЕСТВО КОПИЙ"
}
Add(Edit,9900896,385,420)
{
Left=475
Top=25
Text="1"
DataType=2
}
Add(For,13452048,378,483)
{
Start=1
link(onEvent,2239600:doPrint,[])
link(End,9900896:Text,[])
}