Запуск нескольких потоков

[bilibian]

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

Еще бывает проблема, когда поток останавливается сам по себе. То есть он работает, работает, а потом внезапно исчезает. Например работает приложение в 5 потоков, через некоторое время, потоков уже 3. При этом свое задание они не выполнили. они просто остановились и все.

В общем узнал, что проблема возникает где то тут:

while not Terminated do
begin
	try
		IdHTTP2.CookieManager.Free;
		IdHTTP2.Post(site, Data);
		IdHTTP2.Disconnect;
		sleep(TimeOut);

		html:=IdHTTP2.Get(site);
		IdHTTP2.Disconnect;
		sleep(TimeOut);

		if (Pos('Главная',html) <> 0) then Break;
	except

	end;
end;

Что здесь я сделал криво?

[Stilet]

Что здесь я сделал криво?

Disconnect. sleep.
Я бы это не писал.
IdHTTP2 кому принадлежит? Потоку? Или это компонент, брошенный на форму?

[bilibian]

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

IdHTTP2 кому принадлежит? Потоку? Или это компонент, брошенный на форму?

Потоку принадлежит.

Доп параметры:

idHTTP2:=TIdHTTP.Create(nil);
idHTTP2.HandleRedirects:=True;
idHTTP2.Request.UserAgent:='Mozilla/5.0 (Windows; U; Windows NT 6.1; rv:2.2) Gecko/20110201';
idHTTP2.ReadTimeout:=20000;
IdHTTP2.ProxyParams.ProxyServer:=server;
IdHTTP2.ProxyParams.ProxyPort:=StrToInt(port);

[bilibian]

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

Disconnect. sleep.
Я бы это не писал.

Убрал и в исключение получаю ошибку: Socket Error # 10054

[bulldog5293]

Убрал и в исключение получаю ошибку: Socket Error # 10054

Кто у тебя передаёт значение в TimeOut? Кто его вызывает? Короче bilibian давай что бы с бубном не танцева, и в телепатов не играть, выкладывай полный код программы. Что бы тебе уже точно сказали где и что ты сделал криво

[bilibian]

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

Кто у тебя передаёт значение в TimeOut? Кто его вызывает?

Значение в TimeOut передается из edit с формы.

ThreadArray[i]:=Thr.Create(TimeOut);
ThreadArray[i].FreeOnTerminate:=False;
ThreadArray[i].OnTerminate := ENDTerminated;
ThreadArray[i].Resume;
ThreadArray[i].Priority:=tpNormal;

Далее попадаем в конструктор и присваеваем глобальной переменной TimeOut, принадлежащей потоку, значение с формы.

constructor Thr.Create(TTimeOut:Integer);
begin
  inherited Create(True);
  TimeOut:=TTimeOut;
end;

Далее используем эту переменную в потоке.

Кстати ошибку Socket Error # 10054 выдает один из потоков, а не все. И при завершении потоков по кнопке, поток который выдает эту ошибку не риагирует на остановку. Есть подозрение, что поток не пропадает сам по себе, а просто в цикле получает эту ошибку, соответственно работу он свою выполнять не может. Просто когда задаешь disconnect и sleep эта ошибка не попадает в исключения, по не известным причинам, и ее не получалось отследить.

Прочитал на одном из форумов, что эта ошибка означает потерю соединения с сайтом, но когда соединение восстанавливается idhttp все равно продолжает ее возвращать.

[Stilet]

Эта ошибка говорит что связь разорвана. Обычно либо брандмауер мешает, либо сам связной разрывает связь по каким-то причинам.

[bilibian]

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

Эта ошибка говорит что связь разорвана. Обычно либо брандмауер мешает, либо сам связной разрывает связь по каким-то причинам.

Прописал в исключении

IdHTTP2.Socket.Close;

ошибка появляется один раз, попадает в исключение где закрывается сокет, далее происходит реконнект к сайту и поток продолжает свою работу без ошибок

[bulldog5293]

Есть подозрение, что поток не пропадает сам по себе, а просто в цикле получает эту ошибку, соответственно работу он свою выполнять не может.

А чем ты вообще опридиляеш что он не пропал?

Просто когда задаешь disconnect и sleep эта ошибка не попадает в исключения, по не известным причинам, и ее не получалось отследить.

Насчёт disconnect не скажу, а вот про sleep этому место может быть, у самого раньше таже ситлуация была, что сайты ошибками валили без него, т.к. запросы валишь постоянно и скрипты сайта или ещё что ни будь понимает что это бот программа, а не человек. Но повторюсь нужен полный код, а не огрызки, может у тебя через два-три хода программы вообще другие ошипки повалят

[bilibian]

bulldog5293, сегодня несколько часов тестировал, проблем не наблюдал.

Несколько дней назад, еще до исправления ошибок, ставил работать прогу на длительное время, примерно на сутки, в итоге получил ошибку out of memory.