Для доступа к контенту сайта, пожалуйста отключите Аd-Blосk. При включенном блокираторе сайт может работать не корректно.

Реклама
Новые комментарии
Доска почёта
Посетители
Счётчики



Анализ сайта
Чат

Чтобы оставлять сообщения - зарегистрируйтесь
  • Ognefest
    03:41
    @FuriousPony, да. вы правульно зашли. Знакумьтесь, ето Пендальф, ето Грендальф, а воть ета воть Хрендальф. Пообщуються на экие-эдакие всювозможнаи темы...
    • Ognefest
      03:38
      @logtrigande, у меня есть штук 200 группы по заработку все 200 одной тематики. действующие
      • Ognefest
        03:37
        @logtrigande, айдишники?
        • Ognefest
          03:29
          Чуваки, помогите озлобленному. Ломаните сайт Коммерсвиль. он мне 300р должен. Только 300р и больше не надо))) "Слава хакерам"
          • Zebra320
            01:37
            ребят
            есть стиллер для взлома акаунта в самп
            • logtrigande
              24 янв 2017, 16:31
              id-групп вк список в столбик
              • logtrigande
                24 янв 2017, 16:31
                у кого есть список групп вк? в столбик? можете скинуть пожа
                • sweetlou
                  23 янв 2017, 23:25
                  Кто может оценить Steam акк?
                  • iDroid
                    23 янв 2017, 23:00
                    Провожу Ddos атаки на сайты, писать в лс, там все обсудим
                    • sweetlou
                      23 янв 2017, 12:05
                      Morfej, ты где?
                      • Shimikami
                        23 янв 2017, 11:59
                        xd
                        • sweetlou
                          23 янв 2017, 11:55
                          @FuriousPony, Вы, сударь, ошиблись...
                          • FuriousPony
                            23 янв 2017, 11:41
                            привет, я только что зарегался. Нурм сайт? яжпра вельно понял, это сайт знакомств??
                            • Shimikami
                              23 янв 2017, 07:52
                              ky all
                              • freddy777
                                23 янв 2017, 01:06
                                • -Joni-
                                  22 янв 2017, 21:47
                                  КАК найти мою тему, которую я создавал ???
                                  • DubaSS
                                    22 янв 2017, 20:15
                                    люди нужно взломать почту и контакт в течении 48 часов кто может помочь пишите сразу в вк "ламаю пенопласт" и цену за вк и почту
                                    • waw
                                      22 янв 2017, 07:01
                                      • Kira_the_first
                                        21 янв 2017, 17:34
                                        @Zapilenko, уже биологической(
                                        • Zapilenko
                                          21 янв 2017, 17:08
                                          сайт в состоянии клинической сметри?
                                          • Zapilenko
                                            21 янв 2017, 17:05
                                            hello!
                                            • sweetlou
                                              21 янв 2017, 16:01
                                              хай
                                              • morfej
                                                21 янв 2017, 10:46
                                                Привет
                                                • Shimikami
                                                  21 янв 2017, 09:40
                                                  Доброе утро хацкеры
                                                  • freddy777
                                                    21 янв 2017, 01:31
                                                    Мозг и руки
                                                    • MRX5TAR
                                                      20 янв 2017, 20:59
                                                      Люди что посоветуете что бы взломать phpmyadmin?
                                                      • erlan17
                                                        20 янв 2017, 20:14
                                                        @alex_saratov, спасибо
                                                        • alex_saratov
                                                          20 янв 2017, 20:13
                                                          Цитата: erlan17
                                                          @erlan17, зная только его номер телефона?

                                                          нет...
                                                          • erlan17
                                                            20 янв 2017, 20:12
                                                            @erlan17, я могу заразить троем определённый андроид зная только его номер телефона?
                                                            • erlan17
                                                              20 янв 2017, 20:08
                                                              @erlan17, к примеру телефон моей девушки
                                                              Опрос на сайте
                                                              Как Вы нашли нас?
                                                              Поисковые системы
                                                              Порекомендовали
                                                              По ссылке с других сайтов
                                                              По ссылке с соц. сетей
                                                              Давно тут, по закладке
                                                              Ярлык в архиве с софтом
                                                              Случайно

                                                              Подписки

                                                                Получать новости на email:


                                                                Мы в соц. сетях:

                                                              Реклама

                                                              Последние сообщения с форума

                                                              Название темы Автор Статистика Последнее сообщение
                                                              Самый честный мануал на свете:)

                                                              Тема в разделе: Способы заработка (партнёрки, мануалы)

                                                              Ognefest

                                                              Просмотров: 9

                                                              Ответов: 0

                                                              Автор: Ognefest

                                                              Сегодня, 04:05

                                                              Автомагазин

                                                              Тема в разделе: Купля/Продажа

                                                              KompleviT

                                                              Просмотров: 17

                                                              Ответов: 0

                                                              Автор: KompleviT

                                                              Сегодня, 03:06

                                                              Продам свой аккаунт в World of tanks

                                                              Тема в разделе: Аккаунты (купля/продажа)

                                                              serenbka

                                                              Просмотров: 46

                                                              Ответов: 0

                                                              Автор: serenbka

                                                              Вчера, 23:34

                                                              Использование прокси в программе
                                                              Автор: admin | Дата: 25-12-2011, 10:03 | Комментариев: 3 | Просмотров: 3419
                                                              Сейчас покажу, как нужно использовать различные типы прокси в запросах на Indy. Прокси будем брать из Edit1 и делить на адрес и порт.
                                                              Самое простое это использовать HTTP-прокси:

                                                              IdHTTP1.ProxyParams.ProxyServer:=Copy(Edit1.Text,1,Pos(':',Edit1.Text)-1);
                                                              IdHTTP1.ProxyParams.ProxyPort:=StrToInt(Copy(Edit1.Text,Pos(':',Edit1.Text)
                                                              +1,Length(Edit1.Text)));


                                                              Всё предельно понятно и просто.

                                                              Для использования SOCKS4 и SOCKS5 кроме компонента IdHTTP1 требуются компонент IdSocksInfo (вкладка Indy Misc) и компонент IdSSLIOHandlerSocketOpenSSL (вкладка Indy I/O Handlers).
                                                              В IdSocksInfo указываем тип прокси (svSocks4 или svSocks5), адрес и порт, а также выставляем свойство Authentication в saNoAuthentication:

                                                              IdSocksInfo1.Version:=svSocks4;
                                                              IdSocksInfo1.Host:=Copy(Edit1.Text,1,Pos(':',Edit1.Text)-1);
                                                              IdSocksInfo1.Port:=StrToInt(Copy(Edit1.Text,Pos(':',Edit1.Text)+1,
                                                              Length(Edit1.Text)));
                                                              IdSocksInfo1.Authentication:= saNoAuthentication;


                                                              И присоединяем IdSocksInfo1 к IdSSLIOHandlerSocketOpenSSL1, а IdSSLIOHandlerSocketOpenSSL1 к IdHTTP1:

                                                              IdSSLIOHandlerSocketOpenSSL1.TransparentProxy:=IdSocksInfo1;
                                                              IdHTTP1.IOHandler:=IdSSLIOHandlerSocketOpenSSL1;


                                                              После этого можно делать запрос. Запрос я делал на страницу moi-ip.ru, где на странице отображается IP запрашиваемого. И парсим из ответа IP адрес, который выводим в Memo. Если всё верно и прокси хороший, то используемый прокси и выведенный в Memo должны совпасть.

                                                              Использование прокси в программе


                                                              В качестве бонуса в программе показано, как можно показывать прогресс получения ответа сервера. Он отображается в компоненте Gauge (можно также использовать ProgressBar). В самом начале запроса (IdHTTP1WorkBegin) из заголовков ответа сервера из поля Content-Length берем длину получаемого ответа (обращаю внимание, что такого заголовка может не быть, а значит не всегда можно знать, какой длины будет ответ). И свойству MaxValue присваиваем это значение:

                                                              Gauge1.MaxValue:=strtoint(Pars('Content-Length: ', idhttp1.Response.RawHeaders.Text, #13#10));


                                                              А во время получения ответа (IdHTTP1Work) (а приходит он частями) изменяем свойство Progress:

                                                              Gauge1.Progress:=AWorkCount;


                                                              В результате у нас будет наглядное изображение прогресса загрузки страницы.

                                                              [Скачать] исходник взято с avtuh.ru
                                                              Пароль на все архивы "happy-hack.ru" либо "hh"





                                                              Поделись:
                                                              Здесь присутствуют:
                                                              На данный момент новость никто не просматривает.

                                                              Теги: delphi, proxy

                                                              Уважаемый посетитель, Вы зашли на сайт как незарегистрированный пользователь.
                                                              Мы рекомендуем Вам зарегистрироваться либо войти на сайт под своим именем.

                                                              Репутация: ( 3 )
                                                            • Offline Пользователь offline

                                                              • Написал: ingushmen
                                                              • Дата: 7 июля 2012 00:05
                                                              • Новостей: 6
                                                              • Комментариев: 94
                                                              IdSSLIOHandlerSocketOpenSSL в делфи 7 нет. Надо качать инди 10

                                                              Репутация: ( 0 )
                                                            • Offline Пользователь offline

                                                              • Написал: GlobaToR
                                                              • Дата: 11 октября 2012 20:57
                                                              • Новостей: 0
                                                              • Комментариев: 3
                                                              Вопрос.
                                                              Если делать программу с выбором прокси (пример, RadioButton1 это HTTP (S), а RadioButton2 аналогичный первому Socks 4/5), то работать с if?

                                                              Еще один вопрос.
                                                              Как брать прокси из переменной (к примеру, Proxy) вида TSringList? (так же как и Memo)?
                                                              GlobaToR нравится это.
                                                              Copyright ©

                                                              Репутация: ( 1 )
                                                            • Offline Пользователь offline

                                                              • Написал: klychev
                                                              • Дата: 11 октября 2012 21:06
                                                              • Новостей: 13
                                                              • Комментариев: 72
                                                              GlobaToR, Да.

                                                              Для примера:
                                                              if Proxy>=ProxyList.Count then
                                                              begin
                                                              Proxy:=0;
                                                              end
                                                              else
                                                              begin
                                                              Form1.IdSocksInfo1.Version:=svSocks5;
                                                              Form1.IdSocksInfo1.Host:=Copy(ProxyList[Proxy],1,Pos(':',ProxyList[Pro
                                                              xy])-1);
                                                              Form1.IdSocksInfo1.Port:=StrToInt(Copy(ProxyList[Proxy],Pos(':',ProxyL
                                                              ist[Proxy])+1,Length(ProxyList[Proxy])-Pos(':',ProxyList[Proxy])));
                                                              Form1.IdSocksInfo1.Authentication:=saNoAuthentication;
                                                              end;
                                                              Информация
                                                              Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.