Интересное в сети
Форум happy-hack.ru
Мы Вконтакте
Посетители

Сейчас на сайте: 9
Пользователей: 0
Гостей: 9

Пользователи онлайн: 


- отсутствуют

Гости (20 последних): 



Роботы: 

- отсутствуют
Статистика




Чат

Чтобы оставлять сообщения - зарегистрируйтесь
  • admin
    22 апр 2023, 22:46
    *Diablomy, привет дружище
    • Diablomy
      22 апр 2023, 14:50
      смайликом промахнулся
      • Diablomy
        22 апр 2023, 14:49
        Фигасе, лет 10 меня не было тут admin привет!
        • admin
          10 апр 2023, 05:55
          *voska89, no
          • voska89
            10 апр 2023, 01:41
            Helli admin ! PLease upgrade my account to group uploader . I am uploader soft and ebook
            • admin
              2 мар 2023, 23:18
              *Ytkanos1337, сайту 12 лет и некоторые старые и неактуальные на сегодняшний день разделы и темы могут быть удалены.
              • Ytkanos1337
                28 фев 2023, 13:41
                Почему "Внимание! Обнаружена ошибка
                Пользователи не имеют доступа для просмотра статей из данного раздела." ?
                • Proton
                  22 фев 2023, 00:25
                  Кому нужен ворк пишите мне
                  • valery17
                    16 фев 2023, 16:32
                    На сайте очень много битых ссылок. Непорядок!
                    • Джакомо
                      12 янв 2023, 12:28
                      Собираю команду. цель убийство сайта миротворец !
                      • tversetty
                        9 янв 2023, 13:41
                        я на триаланет еще сидел и уфолабс, были 3 самых топовых сайта на dle. сейчас одни форумы, я рот ебал их
                        • tversetty
                          9 янв 2023, 13:37
                          у тебя же сайт за клаудфларой, почему боишься яровой?
                          • tayfun221
                            8 окт 2022, 18:29
                            Всем привет как выложить видео в тик ток ?
                            • Maxonix
                              2 сен 2022, 03:15
                              Нужно задать алгоритм, чтобы с нужного сайта мне такие картинки прислало
                              • Maxonix
                                2 сен 2022, 03:15
                                Тут кто нибудь может помочь , а то ни разобрался?
                                • Maxonix
                                  2 сен 2022, 03:14
                                  Всем привет
                                  • Twiksar
                                    24 авг 2022, 12:38
                                    Кто знает, как покупать на Амазоне бесплатно? Помогите пожалуйста, буду очень благодарен.
                                    • Kvakowski
                                      6 авг 2022, 21:29
                                      • Hades1234
                                        21 июл 2022, 22:52
                                        для соц сетей номера телефонов. По ключевым фразам. Помню были на форуме проги.
                                        • Hades1234
                                          21 июл 2022, 22:51
                                          Ребят подстажите парсер
                                          • Hades1234
                                            21 июл 2022, 22:51
                                            Всем привет!
                                            • Братишка
                                              2 июл 2022, 18:47
                                              Как мариноват огурци
                                              • MAZAXAKER
                                                21 июн 2022, 21:04
                                                Admin, передай привет SyGaK. ИНШААЛЛАХ!
                                                • admin
                                                  14 июн 2022, 10:17
                                                  • marselshou
                                                    6 июн 2022, 16:55
                                                    у кого есть прога Atomic Warez Leecher? дайте пж вк od marselshowyoutube
                                                    • Kvakowski
                                                      26 апр 2022, 12:56
                                                      *Jons, привет
                                                      • Jons
                                                        25 апр 2022, 05:15
                                                        Привет всем
                                                        • Alexsandr7
                                                          10 апр 2022, 17:25
                                                          ОТДАМ АКК ВК
                                                          • kanistra
                                                            23 мар 2022, 14:49
                                                            Ребят как найти generate death by up0 v 5.0 немогк найти?
                                                            • tayfun221
                                                              22 мар 2022, 20:13
                                                              или любой другой ,может кто написать сможет ,что бы автоматом подключалс к Пулу . И вывод был ,готов с таким человеком поработать .Серьезно .
                                                              Опрос на сайте
                                                              Как Вы нашли нас?

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

                                                              Автор: admin | Дата: 25-12-2011, 10:03 | Комментариев: 0 | Просмотров: 6 347
                                                              Сейчас покажу, как нужно использовать различные типы прокси в запросах на 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

                                                              Пароль на все архивы: hh


                                                              Теги: delphi proxy

                                                              Уважаемый посетитель, Вы зашли на сайт как незарегистрированный пользователь.
                                                              Мы рекомендуем Вам зарегистрироваться либо войти на сайт под своим именем.
                                                              • Написал: ingushmen
                                                              • Дата: 7 июля 2012 00:05
                                                              • Новостей: 6
                                                              • Комментариев: 94
                                                              IdSSLIOHandlerSocketOpenSSL в делфи 7 нет. Надо качать инди 10
                                                              • Написал: GlobaToR
                                                              • Дата: 11 октября 2012 20:57
                                                              • Новостей: 0
                                                              • Комментариев: 3
                                                              Вопрос.
                                                              Если делать программу с выбором прокси (пример, RadioButton1 это HTTP (S), а RadioButton2 аналогичный первому Socks 4/5), то работать с if?

                                                              Еще один вопрос.
                                                              Как брать прокси из переменной (к примеру, Proxy) вида TSringList? (так же как и Memo)?
                                                              • Написал: 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;
                                                              Добавление комментария
                                                              Имя:*
                                                              E-Mail:
                                                              • bowtiesmilelaughingblushsmileyrelaxedsmirk
                                                                heart_eyeskissing_heartkissing_closed_eyesflushedrelievedsatisfiedgrin
                                                                winkstuck_out_tongue_winking_eyestuck_out_tongue_closed_eyesgrinningkissingstuck_out_tonguesleeping
                                                                worriedfrowninganguishedopen_mouthgrimacingconfusedhushed
                                                                expressionlessunamusedsweat_smilesweatdisappointed_relievedwearypensive
                                                                disappointedconfoundedfearfulcold_sweatperseverecrysob
                                                                joyastonishedscreamtired_faceangryragetriumph
                                                                sleepyyummasksunglassesdizzy_faceimpsmiling_imp
                                                                neutral_faceno_mouthinnocent
                                                              Вопрос: И выйдет девушка к тебе, Водой окатит из колодца, Чтобы в суровом октябре Ты мог ********
                                                              Ответ:*
                                                              Введите два слова, показанных на изображении: *