6

deplhiアプリケーション（IE）にブラウザーが統合されています。特定のWebアプリを呼び出す必要があり、jqueryがxhrobjにHTTP_X_REQUESTED_WITHパラメーターを追加するように、アプリケーションのブラウザーからのすべてのリクエストのヘッダーに新しい変数を追加する必要があります。どうすればそれができるかについてのアイデアはありますか？コードサンプルは素晴らしいでしょう。私はusinTWebBrowserです。

4

2 に答える 2

8

OnBeforeNavigate2イベントでヘッダーを変更できます。

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
var
  NewHeaders: OleVariant;
begin
  // do not allow frames or iframes to raise this event
  if (pDisp as IUnknown) = (WebBrowser1.ControlInterface as IUnknown) then
  begin
    // avoid stack overflow: check if our custom header is already set
    if Pos('MyHeader', Headers) <> 0 then Exit;

    // cancel the current navigation
    Cancel := True;
    (pDisp as IWebBrowser2).Stop;

    // modify headers with our custom header
    NewHeaders := Headers + 'MyHeader: Value'#13#10;

    (pDisp as IWebBrowser2).Navigate2(URL, Flags, TargetFrameName, PostData, NewHeaders);
  end;
end;
于 2012-02-09T13:29:06.990 に答える
1

IWebBrowser2.Navigateには、追加のヘッダーを定義できるパラメーターがあります。

于 2012-02-09T13:07:09.260 に答える