И схему можно проще сделать.
Add(MainForm,2953706,91,77)
{
link(onCreate,9564573:doOpen,[])
}
Add(TCP_Server,9564573,168,91)
{
Port=4545
link(onRead,5594224:doStr,[])
link(onConnect,9564573:doSend,[(207,104)(207,132)(158,132)(158,111)])
}
Add(MT_String,5594224,231,91)
{
link(onResult,5219673:doAdd,[])
}
Add(Button,2666426,77,210)
{
Left=15
Top=15
Width=110
Caption="Подключиться"
link(onClick,13546269:doOpen,[])
}
Add(ListBox,5219673,287,91)
{
Left=25
Top=85
Width=330
Height=155
}
Add(TCP_Client,13546269,189,210)
{
Port=4545
IP="127.0.0.1"
link(onRead,13345042:doData,[])
}
Add(DoData,13345042,238,210)
{
Data=String()
link(onEventData,8505971:doEvent1,[(277,216)(277,251)(130,251)(130,230)])
link(Data,2286946:CompName,[])
}
Add(ComputerInfo,2286946,231,154)
{
}
Add(Hub,8505971,140,224)
{
OutCount=3
link(onEvent1,13546269:doSend,[])
link(onEvent2,13546269:doClose,[(165,237)(165,223)])
}