Вверх ↑
Разработчик
Ответов: 26113
Рейтинг: 2126
#1: 2009-03-04 02:20:49 ЛС | профиль | цитата
Вот еще одно из решений этой задачи



Add(MainForm,8199503,189,182)
{
Width=183
Height=201
}
Add(StrList,6924853,245,161)
{
Strings=#2:22|2:12|3:141|2:54|2:23|2:12|3:543|3:141|
Point(onGetIndex)
Point(doGetIndex)
}
Add(Button,8541390,189,231)
{
Left=5
Top=5
Width=95
Caption="Удалить дубли"
link(onClick,15527345:doEnum,[])
}
Add(ArrayEnum,15527345,259,231)
{
link(onItem,14532014:doEvent1,[])
link(Array,6924853:Array,[])
}
Add(ListBox,15052418,371,189)
{
Left=5
Top=30
Width=95
Height=125
Point(doSelectString)
Point(Index)
Point(doSelect)
}
Add(If_else,2609308,392,266)
{
Type=1
Op2=Integer(0)
link(onTrue,15052418:doAdd,[(435,272)(435,171)(359,171)(359,195)])
link(Op1,15052418:Index,[])
}
Add(Hub,14532014,315,231)
{
link(onEvent1,15052418:doSelectString,[])
link(onEvent2,2609308:doCompare,[(350,244)(350,272)])
}

карма: 22

2
Голосовали:andrestudio, Валерий