Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.20;
Скачать: CL | DM;

Вниз

Как клиенту найти сервер.   Найти похожие ветки 

 
SB.John   (2002-03-06 09:12) [0]

Прошу прощения, если такой вопрорс уже был (найти не удалось). Есть приложение клиент/сервер. Только вот заранее неизвестен адрес на котором запущен сервак. Как клиенту его найти. Порт известен. Что-то слышал про широковещательные запросы, но чень смутно. Не хотелось бы перебирать все ip-адреса. Сеть большая, сложная и местами жутко тормозная. Спасибо


 
Slava ©   (2002-03-06 09:20) [1]

procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle);
var
S: TStringStream;
begin
S := TStringStream.Create("");
S.CopyFrom(AData, AData.Size);
ShowMessage(S.DataString);
S.Free;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
IdUDPClient1.Broadcast("Привет",7);
end;


 
Slava ©   (2002-03-06 09:27) [2]

> IdUDPClient1.Broadcast("Привет",7);

7 - это DefaultPort у IdUDPServer1

и BroadcastEnabled у обоих компонент должно быть True

TIdUDPClient и TIdUDPServer - компоненты из Indy


 
SB.John   (2002-03-06 11:28) [3]

Спасибо. Так сразу не все понятно, н дкмаю разберусь



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
1-64575
Ptushenko Denis
2002-04-25 09:51
2002.05.20
Как сделать загрузку проги как в игре


3-64516
kaif
2002-04-21 15:02
2002.05.20
JPEG DBImage


7-64851
Serg001
2002-02-23 18:29
2002.05.20
Как узнать на какой файл ссылается ярлык.


1-64666
aaZ
2002-05-05 15:43
2002.05.20
FormHeader


1-64713
matvey
2002-05-04 18:57
2002.05.20
Курсовая горит!!!!!!