То же, но проще
Add(MainForm,5929309,224,315) { Point(doVisible) link(onCreate,16243181:doEvent1,[]) } Add(ChildPanelEx,691260,658,343) { Mode=1 } BEGIN_SDK Add(EditMultiEx,12923682,21,21) { WorkCount=#5:##add|7:doColor|5:doTop|7:##clear| Point(##add) Point(##clear) link(##add,7445019:doCaption,[(50,27)(50,48)]) link(doColor,7445019:doColor,[(42,34)(42,55)]) link(doTop,14354486:doTop,[(36,41)(36,111)]) } Add(Panel,14354486,63,91) { Left=1 Top=1 Width=50 Height=26 Point(doLeft) Point(doTop) Point(doWidth) Point(doHeight) } Add(BitBtn,7445019,63,42) { Left=1 Top=1 Width=24 Height=24 Align=5 Point(doColor) } END_SDK Add(StrList,11600796,385,273) { Strings=#5:Esc;1|5:F1;30|5:F4;60|6:Ё/~;90|13:BackSpace;120|9:Shift;150|7:Я/Z;180|9:Shift;210|5:1;240| } Add(StrPart,7883352,441,336) { Char=";" link(onSplit,4672311:doEvent1,[(481,342)(481,321)]) link(onPart,691260:##add,[]) } Add(ArrayEnum,1273889,399,336) { link(onItem,7883352:doSplit,[]) link(Array,11600796:Array,[]) } Add(Hub,4672311,490,315) { link(onEvent1,691260:doTop,[(616,321)(616,363)]) link(onEvent2,4485448:doData,[(525,328)(525,356)]) } Add(ColorBox,16053789,476,413) { Left=270 Top=165 DefColor=16777215 link(onClick,11855999:doEvent1,[(616,419)(616,370)]) } Add(DoData,4485448,546,350) { link(onEventData,691260:doColor,[]) link(Data,16053789:CurrentColor,[(552,338)(517,338)(517,457)(482,457)]) } Add(Hub,6255194,336,336) { InCount=2 OutCount=1 link(onEvent1,1273889:doEnum,[]) } Add(Hub,11855999,630,364) { link(onEvent1,691260:##clear,[]) link(onEvent2,6255194:doEvent2,[(675,377)(675,471)(324,471)(324,349)]) } Add(Hub,16243181,273,329) { link(onEvent1,3843121:doData,[(307,335)(307,433)]) link(onEvent2,6255194:doEvent1,[]) } Add(DoData,3843121,399,427) { Data=String(BtnFace) link(onEventData,16053789:doSelectName,[]) }
------------ Дoбавленo:
ajaxii писал(а): то бишь не нужно ждать очищения
Из метода очищения не выйдет, пока не очистит. Представь себе обращение к удаленной подпрограмме, пока Return не получишь, то не выйдешь
|