[delphi] Передача реального реферера

Здравствуйте. Имеется сайт, на котором установлен счётчик LiveInternet, требуется чтобы при входе на данный сайт через webbrowser1, в программе, передавался определённый реферер, и счётчик это учитывал. Использую стандартный компонент webbrowser1 в delphi.

В гугл просьба не отправлять, стандартные варианты не прокатывают, просьба по делу.

 

Сам не пробовал, но говорят работает нормально....

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  Flags, Headers, TargetFrameName, PostData: OLEVariant;
  Url, Ref: string;
  IEApp: OLEVariant;
begin
  Flags := '1';
  TargetFrameName := '';
  PostData := '';
  Url := 'http://www.dach.de/weiterempfehlen.php';
  Ref := 'http://www.dach.de/';
  // u cannot navigate to the url above without this referer
  Headers := 'Referer: ' + Ref + #10 + #13;
  Webbrowser1.Navigate(Url, Flags, TargetFrameName, PostData, Headers);
end;

 

Пробывал. Liveinternet не видит такого реферера( помогите пожалуйста очень нужно.
Возможно за небольшое вознаграждение.

 

Возьми сделай запрос просто толковый на Liveinternet через Indy не морочь себе голову. Или хорошенько погугли гугл, что бы быть в курсе как работать с twebbrowser ...