Make(delphi)
ver(4.03 build 181)
Add(MainForm,2953706,21,105)
{
 Width=375
 Height=251
}
Add(Button,5900693,224,238)
{
 Left=165
 Top=160
 link(onClick,11213725:doEvent1,[(268,244)(268,251)])
}
Add(TCP_Client,621424,315,245)
{
 DataType=3
 link(onRead,16188567:doUpPack,[])
 link(Data,4326318:Text,[])
}
Add(Hub,11213725,280,245)
{
 link(onEvent1,621424:doOpen,[])
 link(onEvent2,621424:doSend,[(301,258)(301,265)])
}
Add(StrList,4326318,322,154)
{
 Strings=#14:Тут GET запрос|
}
Add(Image,8419652,490,224)
{
 Left=105
 Top=30
 Width=165
 Height=105
}
Add(StreamUnPack,16188567,385,245)
{
 link(onUpPack,7898764:doLoadFromStream,[])
}
Add(PNG,7898764,441,224)
{
 Point(doSaveToStream)
 Point(doLoadFromStream)
 link(onBitmap,8419652:doLoad,[])
}