Add(MainForm,2953706,413,287)
{
 Point(doLeft)
 Point(doTop)
 Point(Width)
 Point(Height)
 link(onCreate,14579248:doEvent1,[])
}
Add(DoData,5509714,490,301)
{
 link(onEventData,10938941:doOperation,[])
 link(Data,6896887:right,[])
}
Add(InlineCode,6896887,490,252)
{
 VarPoints=#5:right|3:top|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|38:uses kol,Share,Debug,windows,ShellAPI;|0:|6:const |32: ABM_QUERYPOS:DWORD = $00000002;|1: |4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|46:    procedure top (var data:TData;Index:Word);|48:    procedure right (var data:TData;Index:Word);|5: end;|0:|5:type |18: _bardata = Record|14:  cbSize:WORD;|15:  hWnd:Integer;|27:  uCallbackMessage:integer;|16:  uEdge:integer;|11:  rc:PRect;|17:  lParam:integer;|4:end;|14:implementation|0:|26:procedure THiAsmClass.top;|12:var n:TRect;|5:begin|46:SystemParametersInfo(SPI_GETWORKAREA,0,@n,0); |27:dtInteger(data , n.bottom);|4:end;|0:|28:procedure THiAsmClass.right;|12:var n:TRect;|5:begin|46:SystemParametersInfo(SPI_GETWORKAREA,0,@n,0); |26:dtInteger(data , n.right);|4:end;|0:|4:end.|
}
Add(DoData,8382484,497,308)
{
 link(onEventData,4734065:doOperation,[])
 link(Data,6896887:top,[])
}
Add(Hub,14579248,455,301)
{
 link(onEvent1,5509714:doData,[])
 link(onEvent2,8382484:doData,[])
}
Add(Math,4734065,546,308)
{
 OpType=1
 link(onResult,2953706:doTop,[(638,314)(638,369)(401,369)(401,328)])
 link(Op2,2953706:Height,[(559,292)(584,292)(584,354)(426,354)])
}
Add(Math,10938941,595,301)
{
 OpType=1
 link(onResult,2953706:doLeft,[(658,307)(658,380)(401,380)(401,321)])
 link(Op2,2953706:Width,[(608,292)(584,292)(584,354)(419,354)])
}