Entwickler-Ecke
Windows API - Internet Seite + editfeld öfffnen
Delete - Di 15.07.03 14:34
Titel: Internet Seite + editfeld öfffnen
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:
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 - Di 15.07.03 15:38
Wie wäre:
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.
Delete - Di 15.07.03 15:42
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
|
:cry:
Brueggendiek - Di 15.07.03 22:48
Hallo!
Wie wäre es denn mit
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
Delete - Mi 16.07.03 09:18
Vielen Danke, es funktioniert!!! :wink:
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!