Ausführen von Google Suchen

[juergen]

Versuch mal ein https:// am Anfang anzufügen.

[JimmyB]

Hallo Jürgen,

das war gut, der Browser startet jetzt
Jetzt müsste er noch suchen und damit ein Ergebnis produzieren.

ShellExecute( Handle, 'OPEN', PWideChar( 'https://google.com/search' + TURI.URLEncode( 'USA' ) ), NIL, NIL, SW_SHOWMAXIMIZED );
ShellExecute( Handle, 'OPEN', PWideChar( 'https://google.com/search' + TURI.URLEncode( 'intitle:USA' ) ), NIL, NIL, SW_SHOWMAXIMIZED );
Die Google Suche sagt dann: 404. That’s an error.
The requested URL /searchintitle%3AUSA was not found on this server. That’s all we know.

Ich denke ich bin nah dran, kriege aber keine Kombination hin, die funktioniert.

vg JimmyB

[TurboMagic]

Vielleicht ist das, was du als URL übergibst ja syntaktisch falsch?

Gebe ich USA als SUchbegriff in Google ein, wird eine URL aufgerufen die so startet:
https://www.google.de/search?q=USA
(der Rest dürfte egal sein)

Siehst du den Unterschied zu deiner URL?
search?q=USA

Grüße
TurboMagic

[JimmyB]

Hallo,

das hat geholfen:
ShellExecute( Handle, 'OPEN', PWideChar( 'https://google.com/search?q=' + TURI.URLEncode( 'USA' ) ), NIL, NIL, SW_SHOWMAXIMIZED );

Jetzt wird der Browser aufgerufen
Die Google Suche produziert Ergebnisse, in diesem Fall zum Begriff USA.

Klasse und vielen Dank. Jetzt komme ich weiter!

Viele Grüße
JimmyB

[JimmyB]

Nochmal Danke für die klasse Infos, die sehr gut geholfen haben.

Ich habe versucht die Ergebnisse aus den Suchen, in einem Objekt (nur jeweils die Überschriften) darzustellen.
Bisher habe ich noch kein Objekt gefunden, was die Daten anzeigen könnte.
Wäre die Umsetzung überhaupt möglich?
Viele Grüße
JimmyB

[juergen]

Zum Anzeigen wäre ein TWebBrowser geeignet. => Verwendung TWebBrowser

Wenn du die Informationen aus der Webseite (Suchergebisse) extrahieren willst, kannst du z.B. die HTML-Seite in eine TStringList laden und dort anhand deiner Merkmale alles raussuchen und die Ergebnisse in ein TMemo speichern.

[JimmyB]

Hallo Jürgen,

diese Objekte hatte ich schon ausprobiert, aber da saß der Fehler doch vor der Tastatur.
Was ich vorhabe ist Teile aus den Suchen zu extrahieren. Von daher wäre der Weg über TStringList zu gehen der richtige.

Ich gucke es mir an und danke für die Richtungsweisung!


Viele Grüße
JimmyB