Add(InlineCode,12339685,231,133)
{
 WorkPoints=#6:doWork|
 EventPoints=#5:onRes|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|33:uses kol,Share,Debug;//,Variants;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|22:     onRes: THI_Event;|47:     procedure doWork(var dt: TData; idx:word);|0:|5: end;|0:|14:implementation|0:|54:procedure THiAsmClass.doWork(var dt: TData; idx:word);|3:var|13:  v: variant;|5:begin|15:  v := 224+123;|4:end;|0:|4:end.|
}
Add(Button,4165731,168,133)
{
 Left=25
 Top=15
 link(onClick,12339685:doWork,[])
}