Всем привет.
Понимаю, что тема моя банальна, однако наткнулся на то что требуются живые рекомендации. 
Нужно написать чат с использованием UDP, чисто на интерфейсе WinSock(WinSock2). Использовать какие-либо встроенные компоненты в Delphi нельзя.

Порыскав по интеренету нашёл пару полезных статеек и даже что-то более менее эксперементальное создал, но всё равно пока криво и некрасиво, вообщем не то что бы хотелось.

Пока я сделал так, опишу вкратце:

На компьютере-сервере(он должен быть запущен первым)
Создаю Сокет,

назначаю адрес


Связываю IP и сокет


Далее создаю поток и в его бесконечном цикле вызываю recv



На других компьютерах(клиенты)


Что-то на подобие чата получилось. Но он здесь получается клиент-серверный. Мне же нужен такой где любой пользователь запустивший его увидет любого другого, кто запустил этот же чат.
Опыт с сокетами у меня пока очень низкий, поэтому сложно сразу что-то толковое придумать. 
Что надо применить что бы был нормальный чат? Может что-то добавить, изменить, переделать? 
Заранее спасибо.

Каждый клиент является и клиентом и сервером.
Сообщения шлются броадкастом.
Чтобы узнать, кто в сети, предусматриваешь специальную комманду, типа 'sys: Кто, кто в теремочке живёт'.
Получив эту комманду, каждый клиент отправляет также броадкастом свои данные: 'Я мышка-норушка', 'Я лягушка-квакушка', 'Я Сигизмунд Лазаревич из 4-й квартиры' и т.п.
Аналогично, вошедший, шлёт такой же пакет при входе - 'Я Василий Пупкинсон'.
По этим пакетам синхронизируешь лист на каждом клиенте.
Аналогично выход - при выходе шлёшь броадкастом пакет - 'Я лягушко-квакушко ушло'.
Будут это строки или байт-пакеты - это уже тебе решать, как разработчику протокола обмена.

Snowy, забавно и понятно. 
Спасиб. 
Что-то получилось. ;)