
code_21449.txt
------------ Дoбавленo в 20.22:
А можно и так
Add(MainForm,448315,224,210)
{
Visible=1
Point(Handle)
Point(doVisible)
link(onCreate,2147707:doEvent1,[])
}
Add(TrayIcon,12841479,315,203)
{
MinimizeInTray=1
ShowWORemoveIcon=0
Point(doAddTrayIcon)
link(onClick,10646939:doData,[])
}
Add(ChildForm,9917480,371,259)
{
}
BEGIN_SDK
Add(EditMulti,12357501,21,21)
{
WorkCount=1
Width=202
Height=137
link(doWork1,5876502:doVisible,[(67,27)(67,97)])
}
Add(MainForm,5876502,112,63)
{
Left=35
Top=105
Visible=1
Caption="Child"
Point(Handle)
Point(doVisible)
}
END_SDK
Add(Hub,2147707,273,224)
{
link(onEvent1,12841479:doAddTrayIcon,[])
link(onEvent2,5114395:doTimer,[(301,237)(301,265)])
}
Add(Timer,5114395,315,259)
{
Interval=50
Enable=1
AutoStop=1
link(onTimer,9917480:doWork1,[])
}
Add(DoData,10646939,371,203)
{
Data=Integer(1)
link(onEventData,448315:doVisible,[(417,209)(417,185)(204,185)(204,244)])
}
Может, еще кто чего придумает