TCPServer и TCPClient

[Guest]

Народ подскажите пожалуйста как работать с TCPServer и TCPClient в Делфи7. В 5-ой были компаненты ServerSocket и ClientSocket и в принципе все было ясно и понятно. А тут все переделали и ни как не могу понять как оно все работает. В папку Demos прошу не посылать, был уже. Просто если кто-то реально работал в 7-ой Делфе с ними, подскажите пожалуйста. Зарание спасибо.

 

[Sup]

Практически тоже самое и осталось ...... только событие на прием данных нету ..... вернее есть созвучное событие у TcpClient ..... но оно срабатывает прежде чем данные дойдут до программы.

TcpServer надо использовать в событии OnAccept:

s:=ClientSocket.Receiveln;

у TcpClient :

while TcpClient.WaitForData(милисек) do s:=TcpClient.Receiveln;