Вверх ↑
Ответов: 6
Рейтинг: 1
#1: 2013-12-15 20:59:01 ЛС | профиль | цитата
Чтото схемку не компилит

Add(MainActivity,2953706,21,105)
{
}
Add(TCPClient,1670602,161,294)
{
link(onConnectResult,8591974:doSetText,[(205,300)(205,111)])
link(IP,5659561:Value,[(167,264)(146,264)])
link(Port,11538480:Data1,[(174,279)(195,279)])
}
Add(TCPServer,16352987,266,287)
{
link(onNewClient,579701:doSetText,[])
link(Port,11538480:Data2,[(272,275)(202,275)])
}
Add(TextView,14005331,119,21)
{
Left=15
Top=10
Width=125
Caption="Порт сервера"
}
Add(EditText,12658786,266,203)
{
Left=15
Top=30
Width=135
}
Add(GetData,11538480,189,252)
{
link(dData,12658786:Value,[(195,244)(272,244)])
}
Add(TextView,7788745,168,21)
{
Left=170
Top=10
Caption="IP сервера"
}
Add(EditText,5659561,140,203)
{
Left=170
Top=30
Width=150
}
Add(Button,1667454,70,294)
{
Left=15
Top=90
Caption="Подключиться"
Point(onClick)
link(onClick,1670602:doConnect,[])
}
Add(TextView,6050796,119,63)
{
Left=170
Top=60
Width=140
Height=25
Caption="Статус подключения "
}
Add(TextView,8591974,217,105)
{
Left=170
Top=95
Color=255
Caption=""
}
Add(Button,15392570,350,28)
{
Left=335
Top=30
Width=145
Caption="Открыть порт сервера"
Point(onClick)
link(onClick,16352987:doOpen,[(394,34)(394,164)(254,164)(254,293)])
}
Add(TextView,7613150,168,63)
{
Left=335
Top=65
Width=145
Height=25
Caption="Soket Нового клиента"
}
Add(TextView,579701,322,287)
{
Left=335
Top=95
Width=140
Caption=""
}
карма: 1

0