Add(MainForm,2953706,98,126)
{
 Width=327
 Height=256
 link(onCreate,5766247:doEnum,[])
}
Add(Memo,11666896,154,56)
{
 Left=10
 Top=40
 Width=120
 Height=160
 Strings=#0:|9:int d=123|14:int k=(12+123)|8:int F1()|12:integer F2()|8:int f3()|10:int   f4()|12:integer F5()|11:double F6()|12:void Maiin()|11:bool Петя()|
}
Add(Memo,16774072,294,140)
{
 Left=145
 Top=40
 Width=155
 Height=160
}
Add(ArrayEnum,5766247,168,140)
{
 link(onItem,12502815:doWork,[])
 link(Array,11666896:Array,[])
}
Add(InlineCode,12502815,231,140)
{
 WorkPoints=#6:doWork|
 EventPoints=#5:onRes|
 Code=#15:unit HiAsmUnit;|13:// Author Tad|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|9:   public|22:    onRes : THI_Event;|50:    PROCEDURE doWork(var _Data:TData; Index:Word);|5: end;|0:|42:const a:string ='intdoublestringboolvoid';|0:|14:implementation|0:|29:PROCEDURE THiAsmClass.doWork;|16:var s,ss:string;|5:BEGIN|26: s:=trim(toString(_Data));|19: If s='' then exit;|28: ss:=Copy(s,1,Pos(' ',s)-1);|47: If (Pos(ss,a) <> 0) AND (Pos('=',s) = 0) Then |50: _hi_onEvent(onRes,trim(CopyEnd(s,Pos(' ',s)+1)));|4:END;|0:|0:|4:end.|
 link(onRes,16774072:doAdd,[])
}