Abracadabra писал(а):
Например, растянули таблицу -> последний столбец занял всё "новое" пространствоКак-то так можно
Add(MainForm,2953706,133,147)
{
}
Add(MTStrTbl,10348303,133,196)
{
Left=10
Top=5
Width=365
Height=240
Align=2
Name="table"
Columns=#1:1|1:2|5:3=100|
Point(onResize)
Point(Width)
link(onResize,10508735:doEvent1,[])
}
Add(MST_ArrayCols,5614234,350,161)
{
MSTControl="table"
}
Add(ArrayEnum,6513084,238,231)
{
link(onItem,6374651:doSplit,[])
link(onEndEnum,6289656:doEvent1,[(290,244)(290,314)])
link(Array,5614234:ColumnArray,[(244,212)(356,212)])
}
Add(MultiStrData,6374651,301,231)
{
Char="="
From=1
Count=1
link(onPart1,13102462:doAdd,[(348,237)(348,293)])
}
Add(Hub,10508735,203,224)
{
link(onEvent1,14502203:doClear,[])
link(onEvent2,6513084:doEnum,[])
}
Add(IntegerArray,14502203,413,210)
{
IntArray=[]
}
Add(ArrayRW,13102462,413,273)
{
link(Array,11487932:Var2,[])
link(Index,3926864:Var2,[])
}
Add(ArraySum,13038069,371,315)
{
ArrayType=1
link(Array,11487932:Var1,[(377,257)])
}
Add(GetDataEx,11487932,413,252)
{
link(Data,14502203:Array,[])
}
Add(Hub,6289656,322,308)
{
OutCount=3
link(onEvent1,13102462:doRead,[(360,314)(360,279)])
link(onEvent2,13038069:doSum,[])
link(onEvent3,16178314:doCalc,[(360,328)(360,398)])
}
Add(MathParse,16178314,399,392)
{
DataCount=3
MathStr="%1 - %2 - 23 + %3"
ResultType=0
link(onResult,5226226:doAdd,[])
link(X1,10348303:Width,[(405,376)(167,376)])
link(X2,13038069:Sum,[(412,370)(377,370)])
link(X3,13102462:Item,[])
}
Add(MST_ColAction,3997395,511,392)
{
Action=6
MSTControl="table"
}
Add(MT_Add,5226226,455,392)
{
InputMT=1
link(onAdd,3997395:doColAction,[])
link(Data,3926864:Var3,[(461,249)])
}
Add(GetDataEx,3926864,420,244)
{
Angle=3
link(Data,5614234:EndIdxCol,[(377,249)])
}