Вниз
Скачать: CL | DM;

Помогите мне разабраться с чатом. PLEASE!!!   Найти похожие ветки 

← →
Delpher-Hacker ©   (2002-08-18 02:14) [0]

Вообщем моя проблема заключается вот в чём.
Я взял программу из примеров к Дельфи, и решил её модернизировать.
Borland\Delphi6\Demos\Internet\Chat-вот эта прога. Это чат.
Состоит из одного сервера и нескольких клиентов подключающихся к нему(клиентов может быть много).
И я бы хотел отправлять и получать приватные сообщения, с помощью клиента.
Сервер этого чата может посылать приватные сообщения, но клиенты друг другу не могут.
Вот я и хотел бы узнать как это сделать. Теоритически я представляю как это должно быть.
Клиент посылает своё сообщение, имя клиента(кому придёт это сообщение), и команду, чтобы сервер
смог понять, что это приватное сообщение и не отправлял его всем. Но на практике всё сложнее!
Клиентское приложение использует (IdTCPClient),а сервер (IdTCPServer).
Помогите пожалуйста кодом, если можно.
Заранее благодарен.


← →
VID ©   (2002-08-18 16:43) [1]

хм... а кто сказал что должно быть просто ?
В структуре пакета, определи место для флага "Приватное, Публичное". Вот . а когда север получит пакет,
он прочитает та часть пакета где есть этот флаг, и соответствующим образом будет рассылать полученное сообщение.

Т.е. в пакете должны быть как минимум 4 строки:
1. ОТ кого
2. КОМУ (возмножно несколько пользователей)
3. Тип сообщения
4. Текст сообщения

Когда клиент отправляет пакет, все эти четыре строки должны быть заполнены соотв. образом

Сервер получив такой пакет поведёт себя след образом:
если сообщение публичное, то он просто разошлёт его всем клиентам
если приватное, то только тем, кто есть в списке КОМУ + отправит это сообщение отправителю (что бы в его окне чата тоже было его сообщение)

Какой уж тут код ?



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.014 c
1-68748
Valt
2002-10-11 13:44
2002.10.21
Что-нибудь типа stringgrid, но круче?


14-69012
VictorT
2002-09-30 12:16
2002.10.21
число с ведущими нулями в базе.


1-68754
Николай Быков
2002-10-10 14:59
2002.10.21
TFileStream


14-69014
Юрий Зотов
2002-09-29 00:57
2002.10.21
Рекорд рекордов. Спешите видеть.


4-69089
Varfolomey
2002-07-30 01:47
2002.10.21
Как спятать прогу?




   Наверх