Текущий архив: 2005.02.13;
Скачать: CL | DM;

Вниз

Непойму механизма TTcpServer =(   Найти похожие ветки 

← →
MicrObiolOg   (2004-12-04 17:17) [0]

Есть код:
TcpServer1.LocalPort:=123;
TcpServer1.Active:=True;
TcpServer1.WaitForConnection();
TcpServer1.Accept();

TcpServer1.SendIn("some text");
text:=TcpServer1.ReceiveIn();
rport:=TcpServer1.RemotePort;

Memo1.Lines.Add(text+" - "+rport);

При коннекте польсователя на порт 123 ничего не происходит =(

---

← →
MicrObiolOg   (2004-12-04 20:46) [1]

Уже разобрался, тему можно удалить..

---

Страницы: 1 вся ветка

Текущий архив: 2005.02.13;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.051 c