------------ Дoбавленo в 09.28:
Вот вариант, о котором я говорил выше:
Add(MainForm,2953706,77,112)
{
link(onCreate,14860448:doFor,[])
}
Add(ListBox,95196,217,126)
{
Left=95
Top=105
Align=5
Point(doReplace)
link(Str,7933224:GetData,[])
}
Add(Timer,2376639,77,168)
{
Interval=2000
link(onTimer,14734310:doFor,[])
}
Add(For,14860448,126,126)
{
End=100
link(onEvent,95196:doAdd,[])
}
Add(For,14734310,126,168)
{
End=100
link(onEvent,95196:doReplace,[])
}
Add(Random,16229328,266,77)
{
link(onRandom,7933224:doData,[(310,83)(310,71)(205,71)(205,83)])
}
Add(EventFromData,7933224,217,77)
{
link(onEvent,16229328:doRandom,[])
}
