![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Широковещательный UDP
Antonio © (2005-12-13 19:03:00)Вот, нарыл по хэлпам код отправки широковещательного UDP-пакета:
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),
SizeOfSockOpt)) ;
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;
Возникают вопросы:
Какие компоненты или библиотеки нужно подключать к проекту, чтобы компилятор не ругался на этот код по поводу неизвестных ему операторов?
А также, с помощью каких компонентов можно (удобнее) принимать эти пакеты?
И можно ли посылать широковещательные пакеты по TCP/IP?
Antonio (2005-12-14 00:00:00) [1]Спасибо всем кто ответил. А для приема пакетов тоже Win API использовать, или есть все-таки какой-нибуди нормальный (пряммой) компонент?
DrPass (2005-12-13 21:34:00) [2]юзес ВинСоцк
Antonio (2005-12-13 20:57:00) [3]2: Кефир87.
Хороше, не операторов -а идентификаторов.
Rouse_ (2005-12-13 20:48:00) [4]
> И можно ли посылать широковещательные пакеты по TCP/IP?
нет
Кефир87 (2005-12-13 20:32:00) [5]Не представляю себе компилятор, который ругается при виде операторов собственного компилируемого языка 8))))
Eraser (2005-12-13 19:52:00) [6]
> Antonio (13.12.05 19:03)
Думаю Winsock.