Add(MainForm,3389703,210,56)
{
 Left=20
 Top=105
 Height=175
}
Add(Message,9387846,350,112)
{
}
Add(InlineCode,8329617,294,112)
{
 WorkPoints=#7:SetEdit|
 EventPoints=#7:onEvent|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|2:  |9:   public|23:     onEvent:THI_Event;|56:     procedure SetEdit(var Data:TData; Index:word);     |5: end;|0:|14:implementation|0:|30:procedure THiAsmClass.SetEdit;|5:begin|25: case ToInteger(Data) of |33:     0: _hi_OnEvent(onEvent,'1');|33:     1: _hi_OnEvent(onEvent,'2');|5: end;|4:end;|4:end.|
 link(onEvent,9387846:doMessage,[])
}
Add(Button,10398285,210,112)
{
 Left=15
 Top=20
 Caption="0"
 Data=Integer(0)
 link(onClick,10556899:doWork2,[])
}
Add(Button,2635308,210,161)
{
 Left=15
 Top=50
 Caption="1"
 Data=String(1)
 link(onClick,10556899:doWork3,[(277,167)])
}
Add(HubEx,10556899,273,105)
{
 link(onEvent,8329617:SetEdit,[])
}