Я выкрутился вот так
![](/img/smilies/icon_smile.gif)
Add(MainForm,7093141,546,196)
{
Width=774
Height=305
link(onCreate,1760347:doEvent1,[(614,216)(614,286)])
}
Add(Button,11328530,546,385)
{
Left=310
Top=105
Width=115
Height=50
Caption="Сортировать"
link(onClick,14679489:doSort,[])
}
Add(Memo,4407433,875,259)
{
Left=10
Top=30
Width=270
Height=225
}
Add(Memo,1953806,1010,462)
{
Left=480
Top=30
Width=270
Height=225
}
Add(DoData,15007127,707,280)
{
link(onEventData,10498748:doEvent1,[])
link(Data,15264469:Text,[])
}
Add(Button,4311644,546,287)
{
Left=10
Top=10
Width=110
Caption="Обновить"
link(onClick,1760347:doEvent2,[])
}
Add(Hub,1760347,651,280)
{
InCount=2
OutCount=3
link(onEvent1,15007127:doData,[])
}
Add(StrList,15264469,707,189)
{
Strings=#27:15 =0*%совпадения - 16.65 %|27:24 =3*%совпадения - 11.65 %|27:33 =3*%совпадения - 13.54 %|26:7 =1*%совпадения - 17.89 %|
Point(doSort)
Point(doGetIndex)
Point(String)
Point(doGetString)
}
Add(ArraySort,14679489,756,385)
{
ArrayType=1
link(onEndSort,15862496:doEnum,[(799,391)(799,433)(744,433)(744,454)])
link(Array,15264469:Array,[(762,268)(727,268)])
}
Add(ArrayEnum,15862496,756,448)
{
link(onItem,13437910:doStrCat,[])
link(Array,14679489:ArraySort,[])
}
Add(ListBox,7981722,924,406)
{
Left=300
Top=165
Width=127
Height=76
Visible=1
DataType=1
Point(doSelectString)
Point(String)
}
Add(StrCat,13437910,833,448)
{
Str2="*"
link(onStrCat,15738998:doEvent1,[])
}
Add(Hub,15738998,882,448)
{
link(onEvent1,7981722:doSelectString,[(910,454)(910,440)])
link(onEvent2,3246346:doData,[(924,461)(924,468)])
}
Add(DoData,3246346,945,462)
{
link(onEventData,1953806:doAdd,[])
link(Data,7981722:String,[])
}
Add(Hub,10498748,812,280)
{
link(onEvent1,4407433:doText,[])
link(onEvent2,7981722:doText,[(851,293)(851,433)])
}