Добрый день.Помогите те кто знает.
Мне нужен самописный прокси сервер с авторизацией.
Я использую IdHTTPProxyServer.

В процедуре TForm1.IdHTTPProxyServer1Connect(AContext: TIdContext);

Пишу

  LHeaders := TIdHeaderList.Create(QuoteHTTP);
  AContext.Connection.IOHandler.Capture(LHeaders,'');
  Host:=LHeaders.Values['Host'];
  Avtorizacya:=LHeaders.Values['Authorization'];

   
//Также можно прочитать все заголовки строчками
//Zapros := AContext.Connection.IOHandler.ReadLn(enUTF8);



   //If EstAvtorizaciya Then
   If Avtorizacya='' Then
  Begin

   EstAvtorizaciya:=True;

        Otvet := 'HTTP/1.1 401 Unauthorized'#13#10 +
      'Server: squid/2.5.STABLE3'#13#10 + 'Mime-Version: 1.0'#13#10 +
          'Content-Type: text/html'#13#10 + 'Content-Length: 20'#13#10 +
          'WWW-Authenticate: Basic realm="Test"'#13#10 +
          'Connection: close'#13#10#13#10;

        AContext.Connection.IOHandler.WriteLn(Otvet, enUTF8);
        Abort;
        Exit;
      End;


Так вот у клиента выскакивает окошко вводишь пароль и он передает пароль базовой аутонтефикацией.


Я его проверяю и пропускаю клиента и дальше IdHTTPProxyServer должен выбать клиенту запрашиваемую страницу в виде html

Но он ничего не выдает как я понял я в IdHTTPProxyServer1Connect из сокета забираю заголовки и сокет остается пустой
дальше IdHTTPProxyServer пытается выполнить запрос а он пустой.И получается что выполнять не чего.



Первый вопрос возможно ли как то из сокета скопировать данные не забирая их?
Второй вопрос я правильно понимаю принцип авторизации или мне нужно по другому реализовывать авторизацию.


Есть еще вариант бросить на форму http клиента и его заставить вернуть код запрашиваемой страницы а потом передать ее браузеру но по моему это изврат.


Самый главный вопрос возможно ли как то из сокета скопировать данные не забирая их?