| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Broadcast
NickolayLI © (2002-11-13 14:59:00)привет всем
кто-нить использует компоненты Indy idUDpClient and idUDPServer?
не получается реализовать broadcast, ессли клиента запустить на же машине где и программа-сервер, то клиент к серверу цепляется, а если клиента запустить на какой-нить другой тачке в локалке, то клиент посылая broadcast и сервер не видит :(
Пока
Song (2002-11-15 14:25:00) [21]Не знаю то ли я понял, что Вам нужно.. Попробуйте вот это:
procedure TMainForm.FormCreate(Sender: TObject);
var Init:TWSAData;
SockOpt:BOOL;
Sock:TSocket;
Target:TSockAddrIn;
begin
WSAStartup($101,Init);
Sock:=Socket(PF_INET,SOCK_DGRAM,IPPROTO_UDP);
SockOpt:=TRUE;
SetSockOpt(Sock,SOL_SOCKET,SO_BROADCAST,PChar(@SockOpt),SizeOf(SockOpt)) ;
Target.sin_port:=htons(8167);//номер порта
Target.sin_addr.S_addr:=INADDR_BROADCAST;
Target.sa_family:=AF_INET;
SendTo(Sock,Data,DataBytes,0,Target,SizeOf(Target));
WSACleanup;
end;
nickolayLI (2002-11-15 14:16:00) [22]нет, имеется ввиду без компонент на форме :)
Song (2002-11-15 14:13:00) [23]А через компоненты это не программно? :)
nickolayLI (2002-11-15 14:08:00) [24]а как еще?
можно конечно и програмно, но толку то никакого всеравно нету, пробовал и так делать.
пакеты клиент не видит сервер с другого компа, а видит только сервер тогда когда его запустишь на той же такче где и сервер
Song (2002-11-15 13:30:00) [25]А обязательно надо отправить broadcast UDP через компоненты?
nickolayLI (2002-11-15 13:18:00) [26]Никто не знает? :(
NickolayLI (2002-11-14 13:40:00) [27]Парни? посоветуйте плиз че-нить....
голова не варит уже....
пока.
NickolayLi (2002-11-13 22:00:00) [28]Парни не дайте умереть :((
| |
Страницы: 