------------ Дoбавленo:
При этом должна выделятся предыдущая страница, схема для размышлений
#sha
Add(MainForm,2969037,21,98)
{
Left=20
Top=105
Height=369
}
Add(TabControl,8669777,266,105)
{
Left=10
Top=15
Width=370
Height=190
Bitmaps=[]
Point(CurTabIndx)
Point(Index)
Point(PageTab)
Point(onMouseDown)
Point(PageDelete)
link(onChange,11057279:doText,[])
link(Index,9145336:Value,[])
}
Add(Button,15832728,77,98)
{
Left=10
Top=215
Caption="Add"
link(onClick,1550486:doNext,[])
}
Add(Label,11057279,315,105)
{
Left=330
Top=220
}
Add(Counter,1550486,126,98)
{
Default=-1
link(onNext,9374190:doEvent1,[])
}
Add(Hub,9374190,175,98)
{
OutCount=3
link(onEvent1,16147113:doWork2,[(219,104)(219,62)])
link(onEvent2,8669777:PageInsert,[])
link(onEvent3,8669777:PageTab,[])
}
Add(Button,6519007,77,161)
{
Left=10
Top=245
Caption="Del"
link(onClick,1094151:doData,[])
}
Add(DoData,1094151,126,161)
{
link(onEventData,1427666:doEvent1,[])
link(Data,8669777:CurTabIndx,[(132,149)(279,149)])
}
Add(Memory,9145336,273,56)
{
}
Add(Hub,1427666,175,161)
{
link(onEvent1,16147113:doWork3,[(235,167)])
link(onEvent2,8669777:PageDelete,[(246,174)(246,125)])
}
Add(HubEx,16147113,231,49)
{
link(onEvent,9145336:doValue,[])
}