Вверх ↑
Ответов: 5227
Рейтинг: 587
#1: 2009-03-03 20:30:18 ЛС | профиль | цитата
Ещё такой вариант

Add(MainForm,2953706,77,189)
{
Width=183
Height=201
}
Add(StrList,6924853,189,112)
{
Strings=#2:22|2:12|3:141|2:54|2:23|2:12|3:543|3:141|
Point(onGetIndex)
Point(doGetIndex)
link(onGetIndex,2609308:doCompare,[])
}
Add(Button,8541390,147,189)
{
Left=5
Top=5
Width=95
Caption="Удалить дубли"
link(onClick,15527345:doEnum,[])
}
Add(ArrayEnum,15527345,203,189)
{
link(onItem,6924853:doGetIndex,[(247,195)(247,177)(177,177)(177,160)])
link(Array,6924853:Array,[])
}
Add(ListBox,15052418,301,119)
{
Left=5
Top=30
Width=95
Height=125
link(Str,15527345:Item,[(307,107)(290,107)(290,240)(209,240)])
}
Add(If_else,2609308,238,119)
{
link(onTrue,15052418:doAdd,[])
link(Op2,15527345:Index,[(251,107)(279,107)(279,234)(216,234)])
}


карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
3
Голосовали:filyaxxxcom, Валерий, Andrey