Add(MainForm,2953706,273,168)
{
 Width=532
 Height=249
}
Add(Edit,8864697,441,119)
{
 Left=50
 Top=70
 Width=420
 Height=50
 Font=[MS Sans Serif,30,0,0,1]
 Point(doVisible)
 Point(Handle)
 Point(doSetFocus)
}
Add(InlineCode,13982809,448,168)
{
 WorkPoints=#11:doShowCaret|11:doHideCaret|
 EventPoints=#8:onResult|
 DataPoints=#6:Handle|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|38:uses Windows,kol,Share,Debug,Messages;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|23:     Handle: THI_Event;|25:     onResult: THI_Event;|56:     procedure doShowCaret(var _Data:TData; Index:word);|56:     procedure doHideCaret(var _Data:TData; Index:word);|5: end;|0:|14:implementation|0:|34:procedure THiAsmClass.doShowCaret;|3:var|9:  h:HWND;|5:begin|34:  h := ReadInteger(_Data, Handle);|27:  CreateCaret(h, 0, 3, 45);|15:  ShowCaret(h);|4:end;|0:|34:procedure THiAsmClass.doHideCaret;|3:var|9:  h:HWND;|5:begin|34:  h := ReadInteger(_Data, Handle);|15:  HideCaret(h);|4:end;|0:|4:end.|
 link(Handle,8864697:Handle,[])
}
Add(StyleXP,9536927,273,126)
{
}
Add(Button,11285720,357,140)
{
 Left=55
 Top=40
 Caption="Жир"
 link(onClick,4000874:doEvent1,[])
}
Add(Hub,4000874,399,140)
{
 link(onEvent1,6776184:doWork2,[])
 link(onEvent2,13982809:doShowCaret,[(431,153)(431,174)])
}
Add(Button,5385097,357,98)
{
 Left=120
 Top=40
 Caption="Норм"
 link(onClick,6776184:doWork1,[(424,104)])
}
Add(HubEx,6776184,420,140)
{
 link(onEvent,8864697:doSetFocus,[])
}