Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];




Вниз

методы Socket и Connect (и т.п.) в модуле WinSock - как вызывать? 


Диман   (2001-11-28 12:14) [0]

Здравствуйте все! Сильно не пинайте, но недавно я задавал вопрос как использовать методы (?) socket и connect. Ответ-то дали, но малоинформативный... Порекомендовали порыться в ScktComp.pas. Порылся. Ничего не понял. Поэтому очень прошу - объясните поподробней, лучше примером, как эти самые методы использовать.
Задача у меня простая - не используя компоненты NM (потому что глюкавые и много памяти жрут) посылать/принимать стримы.
Пишу такое:
procedure TForm1.Button1Click(Sender: TObject);
var
WSAData:TWSAData;
MySockAddr:sockaddr_in;
descriptor:integer;
addr_int:Cardinal;
begin
//активизируем WSAData... даже не знаю надо ли? поправьте
WSAStartup($1010,WSAData);
//строчку с инетовским адресом преобразуем в integer-число...
addr_int:=inet_addr(PChar("169.254.0.15"));
//и прописываем в структуре sockaddr_in...
MySockAddr.sin_addr.S_addr:=addr_int;
MySockAddr.sin_port:=500;
//которая нужна для коннекта
// а дальше как-то нужно использовать socket для создания нового соединения
//потом connect(descriptor,MySockAddr,длина - длина чего?);
WSACleanUp;
end;
вот с socket и connect ничего и не ясно. Помогите пожалуйста простым исходником где это все используется.



Digitman   (2001-11-28 12:44) [1]

"Порылся. Ничего не понял"
Рылся ли ты вообще ? И пытался ли понять вообще ?

Эти строчки - из того же ScktComp.pas :


FSocket := socket(PF_INET, SOCK_STREAM, IPPROTO_IP); // создаем гнездо
WinSock.connect(FSocket, FAddr, SizeOf(FAddr)); //делаем попытку коннекта


Что же здесь непонятного ? Объясни, в чем проблема в понимании сего




Форум: "Сети";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.019 c
4-57242           Shark                 2001-12-18 15:25  2002.02.18  
HELP!


1-57101           Song                  2002-02-02 10:19  2002.02.18  
Как получить иконку зарегистрированного расширения для несуществующего файла?


1-57068           Jam                   2002-02-01 13:20  2002.02.18  
Сокрытие формы


1-57066           derr                  2002-01-26 19:58  2002.02.18  
Как вытащить сообщение из outlook express и раскурочить его


1-57153           ola                   2002-02-04 09:49  2002.02.18  
crazy query