А че все так сложно  Add(MainForm,16651951,287,147) { Width=157 Height=163 link(onCreate,13830893:doFor,[]) } Add(MTStrTbl,4558925,546,161) { @Color=255 Left=75 Top=10 Height=110 Name="m" Columns=#2:ст| } Add(MST_DB,2104536,483,161) { @Color=255 MSTControl="m" } Add(For,13830893,343,161) { Start=1 End=3 link(onEvent,15330499:doFor,[]) } Add(For,15330499,392,161) { Start=1 End=3 link(onEvent,13751101:doAdd,[]) } Add(MT_AddData,13751101,441,161) { Count=1 link(onAdd,2104536:doAddRow,[]) link(Data1,15330499:Position,[(447,149)(433,149)(433,203)(398,203)]) } Add(MST_FindText,285319,441,329) { @Color=255 MSTControl="m" Point(doSetFocus) Point(doEnsureVisible) link(onFindText,1518578:doCase,[]) link(StartRow,16537843:Result,[]) } Add(Button,3889797,266,329) { Left=10 Top=10 Caption="find" link(onClick,5198235:doWork2,[]) } Add(Hub,212589,392,329) { OutCount=3 link(onEvent1,285319:doFindText,[]) link(onEvent2,285319:doSetFocus,[(431,342)(431,349)]) link(onEvent3,285319:doEnsureVisible,[(424,349)(424,356)]) } Add(Math,16537843,448,280) { Op2=1 ResultType=0 Point(doClear) link(onResult,11295140:doCompare,[]) } Add(Hub,8810322,574,329) { InCount=2 link(onEvent1,16537843:doOperation,[(599,335)(599,272)(438,272)(438,286)]) link(onEvent2,16651951:doCaption,[(606,342)(606,230)(277,230)(277,153)]) } Add(Case,1518578,490,329) { Value=Integer(-1) DataOnTrue=Integer(-1) link(onNextCase,8810322:doEvent1,[]) link(onTrue,8206052:doEvent1,[]) } Add(Hub,8206052,539,336) { link(onEvent1,8810322:doEvent2,[]) link(onEvent2,6130666:doDeferredEvent,[(564,349)(564,363)]) } Add(DoData,11916831,343,329) { Data=Integer(2) link(onEventData,212589:doEvent1,[]) } Add(HubEx,5198235,315,329) { link(onEvent,11916831:doData,[]) } Add(DeferredEvent,6130666,574,357) { link(onDeferredEvent,5198235:doWork3,[(613,363)(613,398)(319,398)]) } Add(If_else,11295140,497,280) { Type=2 link(onTrue,16537843:doClear,[(536,286)(536,321)(438,321)(438,293)]) link(Op2,285319:EndIdx,[(510,264)(384,264)(384,369)(468,369)]) }
|