Add(MainForm,2953706,238,140)
{
}
Add(Button,11739294,238,182)
{
 Left=10
 Top=5
 Width=165
 Height=40
 Data=String(http://www.rostov-gorod.ru/docs/genplan/013.jpg)
 link(onClick,2944567:doDownload,[])
}
Add(HTTP_Get,2944567,294,182)
{
 link(onDownload,8399227:doCopy,[])
 link(onStop,3419385:doCompare,[(340,209)(340,244)])
}
Add(MemoryStream,8399227,350,189)
{
}
Add(If_else,3419385,357,238)
{
 Type=2
 Op2=Integer(0)
 link(onTrue,2560188:doData,[])
 link(onFalse,2945122:doData,[(403,251)(403,286)])
 link(Op1,8399227:Size,[])
}
Add(Label,7768796,518,245)
{
 Left=10
 Top=50
 Width=165
 Height=55
}
Add(DoData,2560188,413,238)
{
 Data=String(что-то есть)
 link(onEventData,7711221:doEvent1,[])
}
Add(DoData,2945122,413,280)
{
 Data=String(пусто)
 link(onEventData,7711221:doEvent2,[(452,286)(452,251)])
}
Add(Hub,7711221,469,238)
{
 InCount=2
 link(onEvent1,8399227:doClear,[(489,244)(489,174)(340,174)(340,202)])
 link(onEvent2,7768796:doText,[])
}

#pas
function THIHTTP_Get.Execute;
.....
   if _prop_Wait then
     EndDownload
   else th.Synchronize( EndDownload ); // переводится как "синхронизировать"
end;

Add(Button,11739294,56,182)
{
 Left=10
 Top=5
 Width=165
 Height=40
 Data=String(http://www.rostov-gorod.ru/docs/genplan/013.jpg)
 link(onClick,8025464:doEvent1,[])
}
Add(HTTP_Get,2944567,245,182)
{
 link(onStatus,14707583:doPosition,[(291,188)(291,223)])
 link(onDownload,8399227:doCopy,[])
 link(onURLSize,14707583:doMax,[(284,202)(284,230)])
 link(onStop,13758903:doOn,[(335,209)(335,160)])
}
Add(MemoryStream,8399227,406,189)
{
}
Add(If_else,3419385,413,329)
{
 Type=2
 Op2=Integer(0)
 link(onTrue,2560188:doData,[])
 link(onFalse,2945122:doData,[(459,342)(459,377)])
 link(Op1,8399227:Size,[])
}
Add(Label,7768796,574,336)
{
 Left=10
 Top=50
 Width=165
 Height=55
}
Add(DoData,2560188,469,329)
{
 Data=String(что-то есть)
 link(onEventData,7711221:doEvent1,[])
}
Add(DoData,2945122,469,371)
{
 Data=String(пусто)
 link(onEventData,7711221:doEvent2,[(508,377)(508,342)])
}
Add(Hub,7711221,525,329)
{
 InCount=2
 link(onEvent1,8399227:doClear,[(552,335)(552,174)(396,174)(396,202)])
 link(onEvent2,7768796:doText,[])
}
Add(MainForm,16294721,56,119)
{
}
Add(Hub,8025464,105,182)
{
 OutCount=5
 link(onEvent1,13758903:doReset,[(130,188)(130,153)])
 link(onEvent2,2944567:GetURLSize,[(235,195)(235,202)])
 link(onEvent3,2944567:doDownload,[(178,202)(178,188)])
 link(onEvent4,5261786:doRepeat,[(235,209)(235,272)])
 link(onEvent5,3419385:doCompare,[(228,216)(228,335)])
}
Add(Repeat,5261786,357,266)
{
 Op2=Integer(1)
 link(onRepeat,4565320:doProcessMessages,[])
 link(Op1,13758903:State,[])
}
Add(Application,4565320,469,266)
{
 Wait=1
}
Add(Switch,13758903,357,140)
{
 DataOn=Integer(0)
 DataOff=Integer(1)
 Point(State)
 Point(doOn)
}
Add(ProgressBar,14707583,322,217)
{
 Left=15
 Top=230
 Width=355
 Point(doMax)
}