Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi URL für Google-Suche mit "&" Zeichen aufrufen (https://www.delphipraxis.net/197909-url-fuer-google-suche-mit-zeichen-aufrufen.html)

juergen 17. Sep 2018 23:40


URL für Google-Suche mit "&" Zeichen aufrufen
 
Hallo zusammen,

ich rufe aus meinem Programm die Googlesuche auf. Das funktioniert solange im Dateinamen keine "&"-Zeichen im Dateinamen vorkommen.
Diese Zeichen sind ja erlaubt und kommen z.B. in Liedern recht häufig vor.
Nun hatte ich gehofft, dass mir TIdURI.URLEncode weiterhilft. Leider tut es das nicht.

Delphi-Quellcode:
ShellExecute(Handle, 'OPEN', PWideChar(TIdURI.URLEncode('http://www.google.de/search?q=' + Edt_Interpret.Text + ' - ' + Edt_Titel.Text)), nil, nil, SW_SHOWMAXIMIZED);
In dem Edit
Delphi-Quellcode:
Edt_Interpret.Text
könnte z.B. stehen: Smith & Burrows
In der Googler-Suche kommt dann nur "Smith" an.

Hat jemand eine Idee wie man das lösen könnte?

Vielen Dank vorab!

Dalai 17. Sep 2018 23:52

AW: URL für Google-Suche mit "&" Zeichen aufrufen
 
Helfen Quotes um die gesamte URL?

Grüße
Dalai

juergen 17. Sep 2018 23:54

AW: URL für Google-Suche mit "&" Zeichen aufrufen
 
Leider nicht. Das hatte ich auch schon probiert.

Schokohase 18. Sep 2018 00:04

AW: URL für Google-Suche mit "&" Zeichen aufrufen
 
Delphi-Quellcode:
uses
  System.Net.URLClient;

procedure Test;
begin
  WriteLn( 'http://www.google.de/search?q=' + TURI.URLEncode( 'Smith & Burrow' ) );
end;
Code:
http://www.google.de/search?q=Smith%20%26%20Burrow
Falls jemandem nach Lesen zumute ist (soll angeblich eine aussterbende Spezies sein) hier die RFC dazu
https://tools.ietf.org/html/rfc3986

juergen 18. Sep 2018 00:16

AW: URL für Google-Suche mit "&" Zeichen aufrufen
 
@Schokohase,
das war's! Vielen, lieben Dank!

Gute N8! :dp:


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:34 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz