Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.21;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.016 c
7-69047
Dmitry Raduzhan
2002-08-13 11:27
2002.10.21
простенький сервис под W2k, XP


1-68802
NaM
2002-10-09 18:59
2002.10.21
---|Ветка была без названия|---


1-68847
Sergey_Elf
2002-10-10 12:56
2002.10.21
CreateProcess не работает без полного пути к исп.файлу, а надо бы


3-68620
Hro
2002-09-25 23:23
2002.10.21
Как возвратить набор данных из процедуры.


14-68951
Axel
2002-09-25 13:54
2002.10.21
Info about COM+