Решение задачи (в качестве расслабухи  ) для неограниченного количества столбцов Add(MainForm,16570557,77,189) { Width=663 Height=387 link(onCreate,8427954:doFor,[]) } Add(Button,5315267,168,301) { Left=240 Top=315 Width=160 Height=30 Caption="add data" link(onClick,7067217:doEvent1,[]) } Add(MTStrTbl,13292555,77,147) { Left=5 Top=10 Width=640 Height=300 Name="tbl" Columns=#1:1|1:2| } Add(MST_ColAction,6257495,602,203) { Action=4 MSTControl="tbl" } Add(CounterEx,13542597,315,308) { Max=0 Default=-1 Point(onThroughMax) Point(doMax) link(onNext,118985:doEvent1,[]) link(onThroughMax,14979797:doEvent1,[(354,321)(354,209)]) } Add(MST_RowAction,5225647,245,203) { MSTControl="tbl" } Add(Random,5516353,476,378) { link(onRandom,3260640:doWork2,[]) } Add(Hub,118985,427,308) { OutCount=4 link(onEvent1,14212908:doClear,[]) link(onEvent2,3260640:doWork1,[(529,321)]) link(onEvent3,14212908:doValue,[(452,328)(452,307)]) link(onEvent4,5516353:doRandom,[(452,335)(452,384)]) } Add(MST_Matrix,8383986,560,266) { MSTControl="tbl" } Add(MatrixRW,7606358,560,371) { link(Matrix,8383986:Matrix,[]) link(X,14212908:Value,[(580,341)(615,341)]) link(Y,13542597:Count,[(587,362)(321,362)]) } Add(Memory,14212908,609,301) { Default=Integer(0) Point(Data) link(Data,6257495:EndIdxCol,[]) } Add(HubEx,3260640,525,378) { link(onEvent,7606358:doWrite,[]) } Add(MST_ColAction,11954119,511,266) { MSTControl="tbl" } Add(For,8427954,133,203) { End=5 link(onEvent,7512140:doData,[]) } Add(DoData,7512140,189,203) { Data=String() link(onEventData,5225647:doRowAction,[]) } Add(VisualStrings,5815230,462,203) { Lines=#1:0| Point(doText) Point(onText) link(onText,6257495:doColAction,[]) } Add(Hub,14979797,371,203) { link(onEvent1,5815230:doText,[]) link(onEvent2,9612796:doOperation,[(396,216)(396,272)]) } Add(StrCat,13038174,462,266) { Str2="=80==2" link(onStrCat,11954119:doColAction,[]) } Add(Math,9612796,413,266) { Op2=1 ResultType=0 link(onResult,13038174:doStrCat,[]) link(Op1,6257495:CountCol,[(419,243)(608,243)]) } Add(Hub,7067217,217,301) { link(onEvent1,12862246:doData,[(242,307)(242,279)]) link(onEvent2,13542597:doNext,[]) } Add(DoData,12862246,252,273) { link(onEventData,13542597:doMax,[(298,279)(298,321)]) link(Data,5225647:EndIdx,[]) }
|