Pytanie : Ustalony referer gdy otwarty url z Shellexecute

Cześć,

How móc i referrer gdy otwarty URL z shellexecute function

Odpowiedź : Ustalony referer gdy otwarty url z Shellexecute

Ty móc the referrer jeżeli ty używać shellexecute funkcja.

The referrer ty musieć COM protestować i IWebBrowser interfejs:

uses
  SHDocVw;

var
  Wyszukiwarka: IWebBrowser2; // ono musieć globalny lub forma zmienna, ale nie miejscowy

procedura TForm1.Button3Click (Nadawca: TObject);
var
  Url, Flaga, Chodnikowiec, TargetFrameName, PostData: OLEVariant;
zaczynać
  Wyszukiwarka: = CoInternetExplorer.Create;
  (Browser.Get_Application jako IWebBrowserApp). Widoczny: = Prawdziwy;
  Flaga: = "(0)";
  TargetFrameName: = '';
  PostData: = '';
  Chodnikowiec: = "Referer: " + 'http://google.com' + #10 + #13;
  Url: = 'http://www.whatismyreferrer.com/';
  Browser.Navigate2 (Url, Flaga, TargetFrameName, PostData, Chodnikowiec);
końcówka;