Add(Button,10700397,266,231)
{
 Left=5
 Top=40
 link(onClick,6185762:doGet,[])
}
Add(Edit,1008630,315,182)
{
 Left=5
 Top=15
 Width=260
 Text="1024"
}
Add(Message,5861241,364,231)
{
}
Add(InlineCode,6185762,315,231)
{
 WorkPoints=#5:doGet|
 EventPoints=#5:onGet|
 DataPoints=#6:bbytes|
 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|20:    onGet:THI_Event;|4:    |21:    bbytes:THI_Event;|4:    |49:    procedure doGet(var _Data:TData; Index:word);|5: end;|0:|14:implementation|0:|28:procedure THiAsmClass.doGet;|5:begin|61:   _hi_OnEvent(onGet,Num2Bytes(ReadInteger(_Data,bbytes,0)));|4:end;|0:|4:end.|
 link(onGet,5861241:doMessage,[])
 link(bbytes,1008630:Text,[])
}