Add(MainForm,2953706,231,63)
{
 Position=1
 Point(Handle)
 link(onCreate,10931298:doWork1,[(285,83)])
}
Add(Button,7005794,231,112)
{
 Left=-5
 Top=15
 link(onClick,10931298:doWork3,[(285,118)])
}
Add(InlineCode,335488,308,84)
{
 WorkPoints=#23:doVisibilityDebugWindow|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses kol,Share,Debug,hiDebug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|64:    procedure doVisibilityDebugWindow(var dt:TData; index:word);|0:|5: end;|0:|14:implementation|0:|46:procedure THiAsmClass.doVisibilityDebugWindow;|11:var i:word;|5:begin|35: for i:=0 to Applet.ChildCount-1 do|94:  if (Applet.Children[i].SubClassName = 'obj_Form') and (Applet.Children[i].Caption = 'Debug')|69:   then Applet.Children[i].Visible := not Applet.Children[i].Visible;|17: //_hi_OnEvent();|4:end;|0:|4:end.|
}
Add(Debug,15110348,399,203)
{
}
Add(HubEx,10931298,281,84)
{
 link(onEvent,335488:doVisibilityDebugWindow,[])
}
Add(Timer,7003783,343,203)
{
 Interval=500
 link(onTimer,15110348:doEvent,[])
}