Поток в INDY — ANTICHAT Forum

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.

Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.

⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

Поток в INDY

23.05.2010, 08:25

reger1992

Новичок

Регистрация: 21.05.2010

Сообщений: 9

Провел на форуме:
20433

Репутация: 0

Поток в INDY

Всем привет, создаю многопоточное приложение, в каждом потоке динамически создаю индейца. Потом делаю запрос на антикапчу:

Цитата:

procedure Torrent.capthca;
var cap:array [1..1000] of TIdMultiPartFormDataStream;
cap_id: array [1..1000] of string;
i:integer;
response2:array [1..1000] of tstringlist;
begin
response2[num]:=Tstringlist.Create();
IDHTTP2[num]:=TIDHTTP.Create(nil);
IDHTTP2[num].HandleRedirects:=true;
IDHTTP2[num].AllowCookies:=true;
cap[num]:=TIdMultiPartFormDataStream.Create;
cap[num].AddFormField('method','post');
cap[num].AddFormField('key','cd68a7198ea23eb4a77c179d4775e 899');
cap[num].AddFile('file',GetCurrentDir+'\'+inttostr(num)+'. jpg','image/jpeg');
response2[num].text:=IDHTTP2[num].Post('http://antigate.com/in.php',cap[num]);

cap_id[num]:=copy(response2[num].Text,4,9);
sleep(5000);

response2[num].text:=IDHTTP2[num].Get('http://antigate.com/res.php?key='+antigatekey'+'&action=get&id='+cap_i d[num]);

И вот этот GET запрос не выполняется, хотя неделю назад все работало. Что это может быть?