Add(MainForm,3372534,140,231)
{
 Width=603
 Height=417
}
Add(Memo,14886223,189,126)
{
 Width=280
 Height=390
 Align=1
 Strings=#8:Мама+098|8:Папа+890|8:Брат+765|10:Сестра+677|0:|
 ScrollBars=3
}
Add(Memo,7774838,385,189)
{
 Left=300
 Width=295
 Height=390
 Align=3
 ScrollBars=3
}
Add(Button,7091212,140,189)
{
 Left=185
 Top=350
 Width=180
 Height=35
 Align=4
 Flat=0
 link(onClick,14744309:doEnum,[])
}
Add(ArrayEnum,14744309,203,189)
{
 link(onItem,11214294:doSleep,[])
 link(Array,14886223:Array,[])
}
Add(Hub,14799399,301,189)
{
 link(onEvent1,7774838:doAdd,[])
 link(onEvent2,13347052:doProcessMessages,[])
}
Add(Application,13347052,336,196)
{
}
Add(InlineCode,11214294,252,189)
{
 WorkPoints=#7:doSleep|
 EventPoints=#7:onSleep|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses windows,kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|21:   onSleep:THI_Event;|50:   procedure doSleep(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|30:procedure THiAsmClass.doSleep;|13:var s:string;|5:begin|21:  s:=toString(_Data);|14:  sleep(1000);|25:  _hi_onEvent(onSleep,s);|4:end;|4:end.|
 link(onSleep,14799399:doEvent1,[])
}