Автообновление прокси в бруте

[Denis97832]

Всем привет!

Помогите сделать автообновление прокси с бруте

Я вот делал, но при получении новых прокси брут просто останавливается и не идет дальше

В чем может быть проблемма?

Вот сам поток обновления

 

procedure TMyThread.Execute;varHTTP: TIdHTTP;Send: TStringList;Proxy1: String;begin  HTTP:=tidhttp.Create(nil);  Send:=TStringList.Create;  Send.Add('c='+Form23.sEdit2.Text);  try    HTTP.Post('http://hideme.ru/login' Send)  except  if Form23.sComboBox2.Text='http/s' then begin  Proxy1:=Http.Get('http://hideme.ru/api/proxylist.txt?maxtime=2000&type=hs&out=plain〈=ru');  ProxyList.Clear;  ProxyList.Insert(0,proxy1);  end;  end;  Form23.proxylabel.Caption := inttostr(ProxyList.Count); // показывает что 1 прокси, а на самом деле их многоend;

 

Изменено 2 мая, 2015 пользователем Denis97832

[KaLaSh]

ProxyList.Clear;  // чистим старые прокси, то есть сейчас ProxyList.Count: = 0;

ProxyList.Insert(0,proxy1); // добавляем в ProxyList значение переменной proxy1;

На мой взгляд проблема заключается в том, что весь код этой ссылке парсится как одна строка. 

То есть даже если там и много прокси, все равно для delphi это всего одна строка и в переменную ProxyList (как я понял tstringlist) она входит как первый элемент.

Словами трудно объяснить, под спойлером скриншот

  Показать контент

[keng]

Привет! Что ты брутишь и как это относится ко взлому игр?