Add(MainForm,2953706,196,105)
{
 link(onCreate,5640483:doTest,[])
}
Add(InlineCode,5640483,259,119)
{
 WorkPoints=#6:doTest|
 EventPoints=#6:onTest|
 Code=#15:unit HiAsmUnit;|6:// Tad|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|3:   |9:   public|21:    onTest:THI_Event;|50:    procedure doTest(var _Data:TData; Index:Word);|5: end;|1: |15:var  b:boolean;|0:|14:implementation|0:|29:procedure THiAsmClass.doTest;|5:begin|28:_hi_onEvent(onTest,byte(b));|4:end;|0:|14:initialization|8:b:=True;|4:end.|
 link(onTest,2953706:doCaption,[(306,125)(306,88)(182,88)(182,111)])
}