Google Suche

SMARTY1 · Beiträge: 22

Ich möchte einen Begriff, den ich in ein Editfenster eingebe, in Google suchen!

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Button1Click(Sender: TObject);
begin
Shellexecute(0,nil,'http://www.google.de/search?hl=de&q='+Edit1.Text+'&btnG=Google-Suche&meta=',nil,nil, SW_SHOWNORMAL);
end;

Der code funktionniert aber nicht! da kommt immer ein Fehler! Was mach ich falsch?

UGrohne · Verfasst: Fr 28.12.07 12:43

Wenn Du noch sagst, was für ein Fehler, würde uns das sehr helfen :roll:

GTA-Place · Verfasst: Fr 28.12.07 12:48

Moment, ich glaube meine Glaskugel funktioniert wieder: Füg mal ganz oben bei uses ShellApi hinzu.

_________________
"Wer Ego-Shooter Killerspiele nennt, muss konsequenterweise jeden Horrorstreifen als Killerfilm bezeichnen." (Zeit.de)

SMARTY1 · Beiträge: 22

nein, shellapi hab ich schon! Der Fehler der kommt ist: E2010 Inkompatible Typen: 'string' und 'PAnsiChar'

ich habe keine Ahnung! bitte helft mir

Tilman · Verfasst: Fr 28.12.07 13:59

versuch mal PChar(edit1.text)

_________________
Bringe einen Menschen zum grübeln, dann kannst du heimlich seinen Reis essen.
(Koreanisches Sprichwort)

SMARTY1 · Beiträge: 22

Ne funktionniert auch nicht!
Ich checks nicht!

Gausi · Verfasst: Fr 28.12.07 16:24

Ich denke, Tilman meinte so:

markieren

Delphi-Quelltext

1:	Shellexecute(0,nil,PChar('http://www.google.de/search?hl=de&q='+Edit1.Text+'&btnG=Google-Suche&meta='),nil,nil, SW_SHOWNORMAL);

_________________
We are, we were and will not be.

Chryzler · Beiträge: 1097 Erhaltene Danke: 2

Nimm mal das:

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(0, nil, PChar('http://www.google.de/search?hl=de&q=' + Edit1.Text + '&btnG=Google-Suche&meta='), nil, nil, SW_SHOWNORMAL);
end;

SMARTY1 · Beiträge: 22

Hey danke danke danke!
Funktionniert einwandfrei!
Gruß

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme