Вверх ↑
Ответов: 758
Рейтинг: 112
#1: 2019-08-19 21:49:02 ЛС | профиль | цитата
Igor08, Может я чего не понял. Но "Перебор строк StrList с помощью ArrayRW" можно сделать так

Add(MainForm,4813705,315,196)
{
Width=823
Height=601
link(onCreate,9870318:doEnabled,[])
}
Add(StrList,16119185,581,133)
{
Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|
Point(String)
Point(doReplace)
}
Add(Button,9870318,448,210)
{
@Hint=#13:Кнопка расчет|
Left=370
Top=520
Width=100
Height=30
Font=[Times New Roman,14,0,0,204]
Enabled=1
Name="Расчет"
Caption="Расчет"
Point(doEnabled)
link(onClick,14614027:doFor,[])
AddHint(-106,67,89,13,@Hint)
}
Add(Label,4019049,644,210)
{
Left=75
Top=230
Width=235
Height=25
}
Add(ArrayRW,15080711,595,210)
{
link(onRead,4019049:doText,[])
link(Array,16119185:Array,[])
}
Add(For,14614027,497,210)
{
IncludeEnd=1
link(onEvent,4244116:doSleepMks,[])
link(End,16119185:Count,[(510,194)(594,194)])
}
Add(Sleep,4244116,546,210)
{
Delay=1000000
link(onSleep,15080711:doRead,[])
}

карма: 1

0