Вверх ↑
Разработчик
Ответов: 26151
Рейтинг: 2127
#1: 2008-08-23 20:20:43 ЛС | профиль | цитата
LainX писал(а):
При создании сервера у меня возникла такая проблема: TCPServer мог подключать только одного клиента, а других игнорировал

И как это обнаруживалось

В таких случаях, что бы кто-то конкрено помог, необходимо составлять элементарные схемки, где можно было бы глянуть, как составлена схема и нет ли в ней ошибок

------------ Дoбавленo:


Я не знаю, как сделан твой сервер, но вот такая схема прекрасно работает



Add(MainForm,2953706,392,231)
{
Width=527
Height=282
Position=1
link(onCreate,4542206:doOpen,[])
}
Add(Edit,8072895,182,147)
{
Left=305
Top=10
Width=105
Text="127.0.0.1"
}
Add(Button,16216635,154,280)
{
Left=10
Top=10
TabOrder=-1
Caption="Send1"
link(onClick,6871667:doSend,[(202,286)(202,230)])
}
Add(Edit,1900078,266,147)
{
Left=415
Top=10
Width=70
Text="3002"
DataType=2
}
Add(Edit,12447358,224,147)
{
Left=70
Top=10
Width=105
Text="Привет!"
}
Add(Edit,1636085,224,329)
{
Left=70
Top=35
Width=105
Text="Здорово!"
}
Add(Edit,14508988,266,329)
{
Left=415
Top=35
Width=70
Text="3002"
}
Add(Button,9019363,154,462)
{
Left=10
Top=35
TabOrder=-1
Caption="Send2"
link(onClick,4461695:doSend,[(202,468)(202,405)])
}
Add(Edit,13134328,182,329)
{
Left=305
Top=35
Width=105
Text="192.168.1.53"
}
Add(Button,2735880,154,210)
{
Left=185
Top=10
TabOrder=-1
Caption="Connect1"
link(onClick,6871667:doOpen,[])
}
Add(Button,13755786,154,385)
{
Left=185
Top=35
TabOrder=-1
Caption="Connect2"
link(onClick,4461695:doOpen,[])
}
Add(ListBox,1107994,532,315)
{
Left=20
Top=75
Width=195
Height=155
}
Add(TCP_Server,4542206,441,245)
{
Port=3002
link(onRead,14828795:doAdd,[])
link(onConnect,6728166:doWork1,[(501,258)])
link(onDisconnect,6728166:doWork2,[])
}
Add(ArrayEnum,6338546,448,329)
{
link(onItem,1107994:doAdd,[(506,335)(506,321)])
link(Array,4542206:IP,[])
}
Add(Hub,16042064,392,322)
{
link(onEvent1,1107994:doClear,[])
link(onEvent2,6338546:doEnum,[])
}
Add(ListBox,14828795,532,245)
{
Left=220
Top=75
Width=280
Height=155
}
Add(TCP_Client,6871667,217,210)
{
link(onConnect,7294018:doOn,[(257,223)(257,230)])
link(onDisconnect,7294018:doOff,[(257,230)(257,223)])
link(IP,8072895:Text,[(223,194)(188,194)])
link(Data,12447358:Text,[])
link(Port,1900078:Text,[(237,194)(272,194)])
}
Add(TCP_Client,4461695,217,385)
{
link(onConnect,7354877:doOn,[(257,398)(257,405)])
link(onDisconnect,7354877:doOff,[(257,405)(257,398)])
link(IP,13134328:Text,[(223,373)(188,373)])
link(Data,1636085:Text,[])
link(Port,14508988:Text,[(237,373)(272,373)])
}
Add(Button,14979136,154,245)
{
Left=245
Top=10
TabOrder=-1
Caption="DisCon1"
link(onClick,6871667:doClose,[(202,251)(202,223)])
}
Add(Button,576154,154,420)
{
Left=245
Top=35
TabOrder=-1
Caption="DisCon2"
link(onClick,4461695:doClose,[(202,426)(202,398)])
}
Add(LED,7294018,266,210)
{
Left=490
Top=10
Width=16
Height=16
Shape=1
ColorOn=65280
ColorOff=32768
ColorBlick=65280
}
Add(LED,7354877,266,385)
{
Left=490
Top=35
Width=16
Height=16
Shape=1
ColorOn=65280
ColorOff=32768
ColorBlick=65280
}
Add(HubEx,6728166,497,252)
{
Angle=1
link(onEvent,16042064:doEvent1,[(501,299)(380,299)(380,328)])
}
Add(InfoTip,14606794,133,91)
{
Info=#0:|7:Clients|
Font=[MS Sans Serif,10,1,0,1]
Frame=3
Width=197
Height=431
}
Add(InfoTip,4169431,364,175)
{
Info=#0:|6:Server|
Font=[MS Sans Serif,10,1,0,1]
Frame=3
Width=225
Height=242
}

карма: 22

1
Голосовали:Konst