Помогите сделать поиск в MTStrTbl по кругу

То есть - если мы находимся на последней найденной строке и снова нажимаем FindNext,
то в результате что б выбралась строка с первым найденным в начале
Add(MainForm,2953706,301,70)
{
Width=157
Height=163
link(onCreate,13830893:doFor,[])
}
Add(MTStrTbl,4558925,497,35)
{
@Color=255
Left=75
Top=10
Height=110
Name="m"
Columns=#2:ст|
}
Add(Button,4095437,392,175)
{
Left=10
Top=35
Caption="next"
link(onClick,10296630:doEvent1,[])
}
Add(MST_DB,2104536,497,84)
{
@Color=255
MSTControl="m"
}
Add(For,13830893,357,84)
{
Start=1
End=3
link(onEvent,15330499:doFor,[])
}
Add(For,15330499,406,84)
{
Start=1
End=3
link(onEvent,13751101:doAdd,[])
}
Add(MT_AddData,13751101,455,84)
{
Count=1
link(onAdd,2104536:doAddRow,[])
link(Data1,15330499:Position,[(461,72)(447,72)(447,126)(412,126)])
}
Add(MST_FindText,285319,497,168)
{
@Color=255
MSTControl="m"
Point(doSetFocus)
Point(doEnsureVisible)
link(onFindText,8193062:In,[])
}
Add(Button,3889797,392,140)
{
Left=10
Top=10
Caption="find"
Data=Integer(2)
link(onClick,212589:doEvent1,[])
}
Add(Hub,10296630,434,175)
{
link(onEvent1,285319:doFindNext,[])
link(onEvent2,15826261:doEvent1,[])
}
Add(LineBreak,1357736,259,70)
{
link(Out,2953706:doCaption,[])
Primary=[8193062,287,98]
}
Add(Hub,15826261,469,182)
{
InCount=2
link(onEvent1,285319:doSetFocus,[])
link(onEvent2,285319:doEnsureVisible,[])
}
Add(Hub,212589,434,140)
{
link(onEvent1,285319:doFindText,[(472,146)(472,174)])
link(onEvent2,15826261:doEvent2,[(458,153)(458,195)])
}