Delphi-PRAXiS - Delphi User Agent ft. UrlMkSetSessionOption

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)

- - Delphi User Agent ft. UrlMkSetSessionOption (https://www.delphipraxis.net/181108-user-agent-ft-urlmksetsessionoption.html)

User Agent ft. UrlMkSetSessionOption

Hallo,

ich bin noch immer auf der suche wie ich den UserAgent für den TWebBrowser ändern kann.

Diese Methode scheint bis jetzt die vielversprechendste zu sein:

Code:

			procedure SetUserAgent(UserAgent: String);

begin

  UrlMkSetSessionOption(URLMON_OPTION_USERAGENT, Pchar(UserAgent), length(UserAgent), 0);

end;

Jedoch gibt es ein Problem. Es wird laut verschiedenen Webseiten die den User Agent string auslesen und anzeigen, nur der erste buchstabe (in diesem Fall "M") als User Agent
wargenommen.

UserAgent := 'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:29.0) Gecko/20120101 Firefox/29.0'

Was soll ich machen damit ich den user agent entlich ändern kann?

_____
Edit: Embarcadero® RAD Studio XE6 Version 20.0.16277.1276

AW: User Agent ft. UrlMkSetSessionOption

Was für eine Delphiversion?

Versuch es mla mit AnsiString/PAnsiChar

AW: User Agent ft. UrlMkSetSessionOption

OHMGGJLASDFJLDASJFÖL JLSDÖJFLDSJ FLÖDJSÖFDKJS ÖFDJSÖLAFJDKSLFJDÖASFJ

yuhhuuuuhuuuu.

DANKE^10. danke danke danke danke danke danke. Ich habe soviele stunden danach gesucht und entlich funktioniert es. HERZLICHEN DANK!

AnsiString/PAnsiChar hat funktioniert.

danke !!!!!

Lg Simon