пОЧЕМУ ОШИБКИ

← →
pavia (2003-10-09 22:01) [0]

пРИ ВЫХОДЕ ИЗ ПРОГРАММЫ ПЫТАЮСЬ ИЗУЧИТЬ WINSOCK
myVerReqd:=$0101;
WSAStartup(myVerReqd,myWSAData);
ftpSocket:=socket(PF_INET, SOCK_STREAM, IPPROTO_IP);
gethostname(chr,256);

← →
Digitman © (2003-10-10 08:00) [1]

)
это как понимать ?
т.е. программа непонятно как, но уже появилась, уже работает (!!), потом завершает работу - и тут тебя посещает светлая мысль "а не изучить ли мне спецификацию Winsock" ?)

← →
Polevi © (2003-10-10 09:10) [2]

пытаюсь изучить при выходе, lol

← →
Rouse_ © (2003-10-10 09:58) [3]

> пОЧЕМУ ОШИБКИ
а пАТАМУЧТО!!!

Книжку б купил для начала или пример где рабочий взял да посмотрел как нужно правильно. А то исходя из этого кОДА даже мастера делают LOL ;)

Желаю успехов

← →
Ketmar (2003-10-10 13:27) [4]

17-я строка во всём виновата, гадина! %-)

← →
pavia (2003-10-10 20:20) [5]

Ладно посмеялись и хватит.Пытаюсь изучить WINSOCK.Вопрос почему выскакивают ошибки.
procedure TForm1.FormCreate(Sender: TObject);
var c:Pchar;
ftpSocket:TSocket;
myVerReqd:word;
myWSAData : TWSADATA;

begin
{init}
myVerReqd:=$0101;
WSAStartup(myVerReqd,myWSAData);
ftpSocket:=socket(PF_INET, SOCK_STREAM, IPPROTO_IP);
gethostname(c,256);
CloseSocket(ftpSocket);
end;

← →
SammIk © (2003-10-10 20:34) [6]

А поточнее?

← →
pavia (2003-10-10 21:21) [7]

Ладно можете не отвичать.

Замени
c:Pchar;
на
c: array [0..MAX_COMPUTERNAME_LENGTH] of Char;
и
gethostname(c,256);
на
gethostname(@c,256);

в данном случае были проблемы с выделением памяти.

Желаю успехов

ЗЫ: Но так не изучают

Эээ...
вот с этим я переборщил MAX_COMPUTERNAME_LENGTH замени на 255

Желаю успехов

> pavia

при чем здесь WinsockAPI - совершенно непонятно

с равной вероятностью подобная ошибка постигла бы тебя при попытке вызова ф-ции из любого другого API.. нет твердых знаний Паскаля !

ну а касаемо WinsockAPI скажу что строчка

> ftpSocket:=socket(PF_INET, SOCK_STREAM, IPPROTO_IP);

в данном примере совершенно ни к чему : нет никакой необходимости создавать гнездо ради получения имени лок.хоста

пОЧЕМУ ОШИБКИ Найти похожие ветки