| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Непойму механизма TTcpServer =( [D7, WinXP]

MicrObiolOg ©   (2004-12-04 17:17:00) 

Есть код:
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:00) [1]

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

---

Наверх