Soket Error #10054 Connection reset by peer

@DisColor · Регистрация: 08.03.2013

Author24 — интернет-сервис помощи студентам

Здравствуйте, выдает Ошибку

Вот код программы:

Delphi

procedure TForm1.sButton1Click(Sender: TObject);
begin
idIRC1.Nick:=':m1010711';
idIRC1.Password:=sEdit1.Text;
idIRC1.Host:='176.9.146.92';
idIRC1.Port:=6001;
idIRC1.Connect(-5);
end;
 
procedure TForm1.sButton3Click(Sender: TObject);
var
i:integer;
begin
idIRC1.Raw('join #Rus');
sleep(3000);
for i:=4005364 to 5005366 do
idIRC1.Raw('privmsg m'+IntTOStr(i)+' :'+sEdit2.Text+'');
end;

Программа соединяется с чатом, при нажатии на кнопку3, заходит на канал "Rus" И отправляет в приват текст из Edit2 с id4005364 по id5005366 ( Id пользователей в чате). Но при нажатии выскакивает Ошибка Soket Error #10054 Connection reset by peer. Что не так?

@mss · 24.03.2013, 16:36

Сообщение от DisColor

sleep(3000);

Это зачем ?
Ты так и не внемлешь что события следует обрабытывать ?

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	24.03.2013, 16:36	2
	Сообщение от DisColor sleep(3000); Это зачем ? Ты так и не внемлешь что события следует обрабытывать ? 1