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

Вниз

Широковещательный UDP   Найти похожие ветки 

 
Antonio   (2005-12-13 19:03) [0]

Вот, нарыл по хэлпам код отправки широковещательного 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?


 
Eraser ©   (2005-12-13 19:52) [1]


> Antonio   (13.12.05 19:03)

Думаю Winsock.


 
Кефир87 ©   (2005-12-13 20:32) [2]

Не представляю себе компилятор, который ругается при виде операторов собственного компилируемого языка 8))))


 
Rouse_ ©   (2005-12-13 20:48) [3]


>  И можно ли посылать широковещательные пакеты по TCP/IP?

нет


 
Antonio   (2005-12-13 20:57) [4]

2: Кефир87.
Хороше, не операторов-а идентификаторов.


 
DrPass ©   (2005-12-13 21:34) [5]

юзес ВинСоцк


 
Antonio   (2005-12-14 00:00) [6]

Спасибо всем кто ответил. А для приема пакетов тоже Win API использовать, или есть все-таки какой-нибуди нормальный (пряммой) компонент?



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

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

Наверх




Память: 0.47 MB
Время: 0.03 c
2-1134587924
SergP
2005-12-14 22:18
2006.01.01
Не работает sendmessage. подскажите в чем дело...


1-1133495000
dust
2005-12-02 06:43
2006.01.01
как добавить вкладку в свойства папки


14-1134202229
Ксардас
2005-12-10 11:10
2006.01.01
Где можно скачать книгу Рихтера?


14-1134292681
Kerk
2005-12-11 12:18
2006.01.01
Где можно купить фильмы без перевода? С русскими субтитрами


14-1133876836
Sergunchik
2005-12-06 16:47
2006.01.01
Помогите пожалуйста!!!!