Hi!
Ich glaube, du meinst das hier:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var str:
string;
begin
str :='
http://www.jd-fun.de/db/suchmaschine4.php?a='+Edit1.text;
ShellExecute(Application.Handle, '
open', PChar(str),
nil,
nil, sw_ShowNormal);
end;
Hoffe, das klappt.
Ciao Frederic