Thema: Delphi google searcher

Einzelnen Beitrag anzeigen

BullsEye

Registriert seit: 8. Sep 2007
Ort: Werlte
872 Beiträge
 
Delphi 7 Personal
 
#8

Re: google searcher

  Alt 4. Sep 2008, 19:28
Ich stell meine Frage einfach mal hier, da es eig was mit dem Thema zu tun hat:

Delphi-Quellcode:
procedure TfrmGoogle.btnSuchenClick(Sender: TObject);
const
  GOOGLE_QUERY = 'http://www.google.com/search?ie=ISO-8859-1&hl=de&q=';
var
  sQuery: string;
begin
  sQuery := GOOGLE_QUERY + edtSuche.Text;
ShellExecute(Application.Handle, 'open',
               PChar(sQuery), nil, nil,
               SW_ShowNormal);
end;
Mit diesem Code kann ich die Google SuFu nutzten. Soweit sogut. Geb ich in 'edtSuche' , nen Editfeld, beispielsweise 'test' ein, wird der Standardbrowser (FireFox)) geöffnet, wählt google an und sucht damit nach 'test'.
Das ist ja auch alles wunderbar und funzt, so wies soll.

Allerdings wenn ich nun wie folgend eine Eingabe habe:

Zitat:
"" intitle:"index.of" "parent directory" "size" "last modified" "description" [snd] (||||) -inurl:asp -inurlasp|jsp|php|html|htm|cf|shtml) "
passiert NICHTS! Zumindestens wird FireFox nicht geöffnet!
Öffne ich Manuell FF und Google, tippe die Zeile dort ein, wird wunderbar gesucht, so wie es soll.
Also woran kann das liegen?
In diesem Falle ist "sQuery" ein zusammengesetzter String
  Mit Zitat antworten Zitat