Add(MainForm,2953706,133,147)
{
Width=359
Height=184
link(onCreate,4520846:doFor,[])
}
Add(ChildFormEx,14484268,497,161)
{
Mode=2
link(onMouseDown,4830126:doEvent1,[(571,167)(571,271)(422,271)(422,300)])
link(onMouseUp,12822758:In,[])
}
BEGIN_SDK
Add(EditMultiEx,13530495,21,21)
{
WorkCount=#5:##add|5:doTop|6:doLeft|8:##select|8:##delete|
EventCount=#11:onMouseDown|9:onMouseUp|
VarCount=#12:##eventIndex|7:##index|7:##count|
Width=279
Point(##add)
Point(##eventIndex)
Point(##index)
Point(##count)
Point(##select)
Point(##delete)
link(##add,8883510:doVisible,[(95,27)(95,118)])
link(doTop,8883510:doTop,[(87,34)(87,125)])
link(doLeft,8883510:doLeft,[(87,41)(87,132)])
}
Add(MainForm,8883510,154,84)
{
Width=100
Height=100
Visible=1
DragForm=0
Point(doVisible)
Point(onMouseDown)
Point(doTop)
Point(doLeft)
Point(onMouseMove)
link(onMouseDown,13530495:onMouseDown,[(228,111)(228,27)])
link(onMouseMove,16704672:doEvent,[(202,118)(202,132)])
}
Add(IndexToChanel,16704672,217,126)
{
link(onEvent1,13530495:onMouseUp,[(275,132)(275,34)])
}
END_SDK
Add(Label,15719916,497,294)
{
Left=275
Top=15
link(Text,14484268:##eventIndex,[])
}
Add(StrList,11186923,259,91)
{
Strings=#7:100,300|7:350,300|7:550,300|
}
Add(ArrayRW,10357552,273,161)
{
link(onRead,14118768:doSplit,[])
link(Array,11186923:Array,[])
}
Add(StrPart,14118768,329,161)
{
Char=","
DirectEvent=0
link(onSplit,9390884:doEvent1,[])
link(onPart,14484268:doLeft,[(376,174)(376,181)])
}
Add(Hub,9390884,392,161)
{
link(onEvent1,14484268:##add,[])
link(onEvent2,14484268:doTop,[])
}
Add(Label,13540152,119,28)
{
Left=35
Top=85
Width=117
Height=17
Caption="
Ответов: 875
Рейтинг: 322
|
|||
Пытаюсь удалить форму при отпускании ЛКМ, но пишет, что самоубийство запрещено. Как можно это осуществить?
|
|||
карма: 1 |
|