RomanRoman писал(а):
через FileStream, загружается в ListBox, перебирается ArrayEnumЕсли будешь использовать ListBox то и счётчик использовать необязательно.
Add(Label,13803514,273,35)
{
Left=270
Top=35
Height=30
Align=2
Caption=""
AutoSize=1
}
Add(MainForm,16184661,105,105)
{
Left=20
Top=105
Width=501
Height=412
Caption="Проверка графика"
link(onCreate,11209926:doWork2,[])
}
Add(For,10143007,182,119)
{
End=100
link(onEvent,9575533:doRandom,[])
link(onStop,2814174:doEnum,[(228,132)(228,202)])
}
Add(Random,9575533,238,119)
{
Min=-2
Max=2
link(onRandom,3117829:doCalc,[])
}
Add(MathParse,3117829,301,119)
{
MathStr="%1 + %0"
Point(doClear)
link(onResult,10481824:doAdd,[])
}
Add(StrList,10481824,364,119)
{
}
Add(Plotter,11338811,427,119)
{
Width=485
Height=373
Align=5
Name="plotter"
}
Add(PlotPoints,5149791,595,252)
{
Grapher="plotter"
Color=0
Size=4
Shape=2
link(ValueX,9093669:Position,[(608,243)(573,243)(573,292)(482,292)])
}
Add(PlotLines,6267160,434,196)
{
Grapher="plotter"
Step=1
}
Add(ArrayEnum,2814174,378,196)
{
link(onItem,6267160:doAdd,[])
link(onEndEnum,9093669:doFor,[(417,209)(417,258)])
link(Array,845701:Var2,[])
}
Add(ArrayRW,14414217,525,252)
{
link(onRead,5149791:doAdd,[])
link(Array,845701:Var3,[(531,173)])
}
Add(For,9093669,476,252)
{
Step=5
link(onEvent,14414217:doRead,[])
link(End,10481824:Count,[(489,180)(377,180)])
}
Add(GetDataEx,845701,378,168)
{
link(Data,10481824:Array,[])
}
Add(Button,2313736,84,175)
{
Left=25
Top=10
link(onClick,930204:doEvent1,[])
}
Add(Hub,930204,140,175)
{
OutCount=5
link(onEvent1,3117829:doClear,[(277,181)(277,132)])
link(onEvent2,10481824:doClear,[(340,188)(340,132)])
link(onEvent3,6267160:doClear,[(424,195)(424,209)])
link(onEvent4,5149791:doClear,[(221,202)(221,237)(564,237)(564,265)])
link(onEvent5,11209926:doWork3,[(165,209)])
}
Add(HubEx,11209926,161,119)
{
link(onEvent,10143007:doFor,[])
}