Вверх ↑
Разработчик
Ответов: 26170
Рейтинг: 2127
#1: 2011-03-29 13:21:23 ЛС | профиль | цитата
Вот вариант, который повторяет функционал sintet, но в несколько раз короче



Add(MainForm,1970030,266,154)
{
Width=150
Height=150
Name="f1"
Point(onResize)
Point(Width)
Point(Height)
link(onResize,9358788:doWork3,[(310,181)])
}
Add(ChildForm,12565054,322,210)
{
link(onEvent1,9358788:doWork2,[(366,216)(366,147)])
}
BEGIN_SDK
Add(EditMulti,10630936,21,21)
{
EventCount=1
WorkCount=1
Width=181
Height=102
link(doWork1,14363342:doSeparateMT,[(35,27)(35,69)])
}
Add(MainForm,15065987,105,35)
{
Left=35
Top=105
Width=150
Height=150
Name="f2"
FormFastening="parent.f1"
Point(doShiftLeft)
Point(doHeight)
Point(onResize)
link(onResize,10630936:onEvent1,[(169,62)(169,27)])
}
Add(MT_MultiData,14363342,49,63)
{
link(onData1,15065987:doShiftLeft,[])
link(onData2,15065987:doHeight,[])
}
END_SDK
Add(MT_AddData,1849841,266,210)
{
link(onAdd,12565054:doWork1,[])
link(Data1,1970030:Width,[])
link(Data2,1970030:Height,[])
}
Add(HubEx,9358788,306,141)
{
Angle=2
link(onEvent,1849841:doAdd,[(250,147)(250,216)])
}

Дочерняя форма будет перемещаться вместе с основной и повторять ее высоту. Расширение основной приведет к пропрциональному смещению дочерней, те дочерняя остается всегда приклеенной к правому краю основной
карма: 22

0