Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

чат,ошибка сокета 11004 [D7]

Екатерина © (2012-11-25 02:21:00)
нужна помощь!
необходимо написать простенький чат
код клиента:
procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
StatusBar1.SimpleText := 'Ñîåäèíåíèå óñòàíîâëåíî';
{êàê òîëüêî ïðîèçîøëî ñîåäèíåíèå - ïîñûëàåì ïðèâåòñòâèå}
Socket.SendText('Hello!');
ListBox1.Items.Add('< Hello!');
end;

procedure TForm1.btnSendClick(Sender: TObject);
begin
ClientSocket1.Socket.SendText(edtMsg.Text); //
ListBox1.Items.Add('[Client]< ' + edtMsg.Text);
edtMsg.Clear;
end;

procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
begin

ListBox1.Items.Add('[Server]> ' + Socket.ReceiveText);
end;

procedure TForm1.btnConnectClick(Sender: TObject);
begin
ClientSocket1.Address := edtIP.text; //IP
ClientSocket1.Active :=True; //êîííåêòèìñÿ
end;

procedure TForm1.ClientSocket1Disconnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
StatusBar1.SimpleText := 'Ñîåäèíåíèå íå óñòàíîâëåíî';
end;

procedure TForm1.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
ShowMessage('Îøèáêà ¹' + IntToStr(ErrorCode));
ErrorCode :=0;
end;

end.

код сервера:
procedure TForm1.ServerSocket1ClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
StatusBar1.SimpleText := 'Ñîåäèíåíèå óñòàíîâëåíî';
end;

procedure TForm1.btnSendClick(Sender: TObject);
begin
ServerSocket1.Socket.SendText(edtMsg.Text); //ïîñûëàåì ñîîáùåíèå
ListBox1.Items.Add('[Server]> ' + edtMsg.Text); //äîáàâëÿåì ñîîáùåíèå â äèàëîã
edtMsg.Clear;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ServerSocket1.Active:= true; //
end;

end.

при попытке соединения выдаёт ошибку 11004...

Сергей М. (2012-11-25 22:38:00) [1]

> 10049 "требуемый адрес для своего контекста неверен"

Это чей-то фривольно-абстрактный перевод фрагмента оригинальной документации:

WSAEADDRNOTAVAIL
The specified address is not available from the local machine
"Указанный адрес не доступен с этой локальной машины".

Это прямой результат твоих "некоторых манипуляций".
Верни всё на место как было и больше не трогай ничего.

sniknik (2012-11-25 22:03:00) [2]
> мда..ни одного дельного совета, а стебаться - так это пожалуйста...
ни одного понятого, смею поправить, а так, насчитал 3 дельных...

Екатерина (2012-11-25 19:32:00) [3]
> Ботекс вкачала что ли ?
> Ты пойми, дитятко, - НИКТО кроме тебя не знает о твоих "манипуляциях".

мда..ни одного дельного совета, а стебаться - так это пожалуйста...

Сергей М. (2012-11-25 17:37:00) [4]

> после некоторых манипуляций

Ботекс вкачала что ли ?
Ты пойми, дитятко, - НИКТО кроме тебя не знает о твоих "манипуляциях".

Екатерина (2012-11-25 12:51:00) [5]
после некоторых манипуляций стало выдавать уже ошибку 10049 "требуемый адрес для своего контекста неверен"...клиент получает адрес 172.0.0.1.. порт 8888...хотя эта ошибка вылазит при любом IP. может кто-то сталкивался с таким? явных ошибок не видно...

Anatoly Podgoretsky (2012-11-25 09:57:00) [6]
> Екатерина (25.11.2012 02:21:00) [0]

Список тем только по исправлению

http://www.bing.com/search?q=Socket+Error+11004+Fix&FORM=R5FD7

Anatoly Podgoretsky (2012-11-25 09:55:00) [7]
> Екатерина (25.11.2012 02:21:00) [0]

Поиск по 11004 – это ошибка ДНС, пробуй исправить с помощью sfc

http://forum.teamspeak.com/showthread.php/14420-Socket-Error-(11001-11004)

brother (2012-11-25 09:47:00) [8]
http://otvet.mail.ru/question/36534056
оно?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »