Нахождение запущенного сервака в сети.

[=) mazutka =)]

Добрый вечер!
Ребята, такая проблема. У меня курсач по теме-локальная ася. Пишу на Delphi при помощи сокетов. Есть два приложения сервер и клиент. И возник след. вопрос:
Как сделать, что бы при очередном запуске сервака он проверял есть ли в сети уже запущенный и если есть, говорил пользователю, что сервер запущен на другом компе и запущенный сервер рассылал новым клиентам свой IP ???

Помогите пожалуйста...объясните чайнику подробно, что, да как....заранее благодарю_)

[Stilet]

Разсылай UDP Broadcast всем . В пакет помести определенную синатуру, пусть сервак если запушен проанализирует эту сигнатуру, и если она содержит запрос на идентификацию (клиент это или сервер) пусть ответит. (я лично так в колледже делал)

[=) mazutka =)]

А можно попросить какую-нить информацию про UDP Broadcast?
Если сохранилась, то та которой ты сам пользовался, когда свое приложение реализовывал?

[Stilet]

м.м.м я тогда инфу вообще не сохранял себе, только на компах в классе делал (да мне тогда 1 дня хватило + Хелпы), так что извини, не располагаю.
А вообще примеров туча, и здесь на сайте тоже помоему есть.

[=) mazutka =)]

Спасиб...исчерпывающий ответ...

[=) mazutka =)]

Пасиб, Stilet)
Поняла в какой стороне искать)

у кого ещё возникнут вопросы по простейшей работе с UPD пакетами.
вот ссылочка на статью журнала хакер...где объясняют легко и доступно...
во всяком случае мне оч помогло..
http://www.xakep.ru/magazine/xa/038/061/2.asp

[Delphi_ProGer]

Здраствуйте! Дабы не плодить новые темы(а у меня проблема такая же) задам здесь вопрос: вот посмотрел я последний пост, там ссылка. Пробую задействовать этот код, но у меня отличие - вместо

procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData:
TStream; ABinding: TIdSocketHandle);

у меня в Delphi XE3

procedure TfrmServer.IdUDPServerUDPRead(AThread: TIdUDPListenerThread;
AData: array of Byte; ABinding: TIdSocketHandle);

Что мне делать с

AData: array of Byte;

- я понятия не имею...

[Stilet]

Что мне делать с

А что нужно с ним делать?
Если нужно преобразовать в поток то:

...
ms:=TMemoryStream.Create;
ms.Write(AData[0],Length(AData));
...