Internet Seite + editfeld öfffnen

Ehemaliges Mitglied Erhaltene Danke: 1

Hi!
Also wenn ich auf nen Button klikce, möchte ich dass auf Google der Text von nem Editfeld gesucht wird, leider funktioniert es so nich:

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.btn_losClick(Sender: TObject);
begin
ShellExecute(0, 'open', 'http://www.google.de/search?q='+ ('ed_string.text'), nil, nil, SW_SHOW);
end;

Weiss einer wie es geht??

derDoc · Beiträge: 623 Win Vista Prof D2007 Prof

Wie wäre:

markieren

Delphi-Quelltext

1:	ShellExecute(0, 'open', 'http://www.google.de/search?q='+ Ed_String.Text, nil, nil, SW_SHOW);

Bei deinem Beispiel hast du einen String 'Ed_String.Text' an Google übergeben. Entferne einfach die () und die '' und schon funktioniert es.

_________________
MfG derDoc
There are only 10 types of people: those who understand binary and those who don't.

Ehemaliges Mitglied Erhaltene Danke: 1

Geht auch nicht

Zitat:

[Fehler] Unit1.pas(132): Inkompatible Typen: 'String' und 'PAnsiChar'
[Fataler Fehler] Project1.dpr(5): Verwendete Unit 'Unit1.pas' kann nicht compiliert werden

Brueggendiek · Beiträge: 304 Win 98, Win98SE, Win XP Home D5 Std

Hallo!

Wie wäre es denn mit

markieren

Delphi-Quelltext

1:	ShellExecute(0, 'open', pChar('http://www.google.de/search?q='+ Ed_String.Text), nil, nil, SW_SHOW);

Die Windows-API-Funktionen kommen nicht mit STRING zurecht - sie brauchen pChar!
Reine Literale können ohne Typumwandlung übergeben werden - der Compiler erzeugt automatisch bei 'open' einen pChar. String-Variablen und Ausdrücke wie "'literal' + variable" müssen aber umgewandelt werden.

Gruß

Dietmar Brüggendiek

Ehemaliges Mitglied Erhaltene Danke: 1

Vielen Danke, es funktioniert!!! :wink:

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme