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,[])
}
ajaxii писал(а):
то бишь не нужно ждать очищенияИз метода очищения не выйдет, пока не очистит. Представь себе обращение к удаленной подпрограмме, пока Return не получишь, то не выйдешь