kamakama писал(а):
просто воспользоваться strPart навряд ли получится.Получиться. Знаю, что так лучше не делать, но работает...
Add(MainForm,1153697,168,126)
{
Width=366
}
Add(Memo,4109386,273,91)
{
Left=5
Top=10
Width=180
Height=200
Strings=#27:Пойти в кино, сделать уроки|18:Погулять на улице.|30:Жил да был черный кот за углом|25:и его ненавидел весь дом.|
ScrollBars=2
}
Add(Button,16690230,210,175)
{
Left=60
Top=230
Width=230
link(onClick,1012169:doData,[])
}
Add(Memo,12997050,525,182)
{
Left=205
Top=10
Width=145
Height=200
ScrollBars=2
}
Add(StrPart,12867627,364,175)
{
Char=" "
Point(Right)
Point(onNotFound)
link(onSplit,10195477:doWork1,[(410,181)(410,156)(340,156)])
link(onPart,14819609:doWork2,[])
link(onNotFound,11460469:doData,[(415,195)(415,209)])
}
Add(HubEx,10195477,336,168)
{
link(onEvent,12867627:doSplit,[])
}
Add(HubEx,14819609,504,175)
{
link(onEvent,12997050:doAdd,[])
}
Add(DoData,11460469,434,203)
{
link(onEventData,14819609:doWork3,[(508,209)])
link(Data,12867627:Right,[(440,191)(405,191)(405,219)(370,219)])
}
Add(DoData,1012169,273,175)
{
link(onEventData,10195477:doWork2,[])
link(Data,4109386:Text,[])
}