Здравствуйте. Решил написать чат, нашел исходник, но в исходнике сообщения раздаются всем пользователям
код:
Код:
For i := 0 to Server.Socket.ActiveConnections - 1 do
{Проверяем - если идентификатор очередного сокета не совпадает
с идентификатором сокета, приславшего сообщение, то...}
if Server.Socket.Connections[i].SocketHandle <> Socket.SocketHandle then
{... посылаем очередной клиентской программе новое сообщение}
Server.Socket.Connections[i].SendText(S);
lmikle: пользуемся тегами!!!
а я хочу чтобы юзер в клиентской части чата выбирал пользователя и сообщение отсылалось только ему. Я думал сделать так:
При выборе пользователя которому адресуется сообщение, в конец сообщения будет добавлятся ip получателя.
Вопрос: а можно по ip узнать сокет?
В программе используется TServerSocket и TClientSoket