Entwickler-Ecke

Internet / Netzwerk - Delphi Web-Browser - 'general.useragent.override'


Nowo - Do 11.06.09 01:39
Titel: Delphi Web-Browser - 'general.useragent.override'
Hallo Delphi-Forum
In meinem Delphi Webbrowser würde ich gerne den Useragent wechseln,
will heißen als was der WebBrowser sich ausgiebt.

Bei Firefox gibts dafür in der about:config den schönen Eintrag: "general.useragent.override"

Wie definiere ich den denn im Delphi Webbrowser ?



Nowo


toms - Do 11.06.09 05:07

Hallo

Eine Möglichkeit wäre das setzen des Useragents mittels UrlMkSetSessionOption:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
uses
  URLMon;

procedure SetUserAgent(const UserAgent: String):
begin
  UrlMkSetSessionOption(URLMON_OPTION_USERAGENT, PChar(UserAgent), Length(UserAgent), 0);
end;


Eine andere: u.a. IDispatch implementieren und im Invoke bei DISPID_AMBIENT_USERAGENT den Useragent setzen (Siehe EmbeddedWB od. EwbCore von bsalsa.com)


Nowo - Do 11.06.09 12:03

Merci mon ami