#sha
Add(MainForm,3598708,105,182)
{
 Left=20
 Top=105
 Width=246
 Height=244
}
Add(Clipboard,5651252,259,259)
{
}
Add(Timer,1577703,161,259)
{
 Interval=20
 Enable=1
 link(onTimer,12094825:doData,[])
}
Add(DoData,12094825,210,259)
{
 Data=String(Фига тебе :))
 link(onEventData,5651252:doPutText,[])
}
Add(Memo,4281865,322,259)
{
 Left=10
 Top=40
 Width=215
 Height=160
 Strings=#13:И вставь сюда|
}
Add(Edit,2590093,105,245)
{
 Left=10
 Top=10
 Width=215
 Text="Скопируй меня :)"
 Point(onSetFocus)
 Point(onKillFocus)
 link(onSetFocus,1577703:doTimer,[])
 link(onKillFocus,1577703:doStop,[])
}