Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Link aus Edit-Feld öffnen (https://www.delphipraxis.net/69551-link-aus-edit-feld-oeffnen.html)

Shudder 16. Mai 2006 22:50


Link aus Edit-Feld öffnen
 
Hallo Community,

bin sowohl neu hier als auch ein Anfänger in Delphi.
Wollte mich mal Just 4 Fun an ein kleines Prog setzen, bin dabei aber auf ein kleines Problem gestoßen was sich aber (denke ich) schnell lösen lassen sollte.

Ich möchte gern das mein Programm auf Knopfdruck eine URL im Standardbrowser öffnet die vorher im Edit-Feld eingegeben wurde.
Generell würde ich eine bestimmte Seite ja mit diesem Befehl öffnen:

Delphi-Quellcode:
Shellexecute(0,'open','http://www.google.de', nil, nil, SW_SHOW);
Stellt sich jetzt für mich bloß die Frage wie ich den Befehl umschreibe so dass er die Seite öffnet die im Textfeld eingegeben wurde...

Vielen Dank schon mal,

MfG
Shudder

pacman1986 16. Mai 2006 23:10

Re: Link aus Edit-Feld öffnen
 
Delphi-Quellcode:
Shellexecute(0,'open',edit.text, nil, nil, SW_SHOW);
da es ein string is kannst du den aus einer Variable oder sonst wo herholen. also einfach editfeldname.text eingeben

Hawkeye219 16. Mai 2006 23:14

Re: Link aus Edit-Feld öffnen
 
Hallo Shudder,

herzlich willkommen in der Delphi-PRAXiS!

Eine kleine Korrektur zum obigen Code:

Delphi-Quellcode:
Shellexecute(0,'open',PChar(edit.text), nil, nil, SW_SHOW);
Gruß Hawkeye

Shudder 16. Mai 2006 23:19

Re: Link aus Edit-Feld öffnen
 
Ahhhh, das sieht doch schon einläuchtender aus ! :thumb:

War nämlich der Meinung das ich aus blindem Verdacht auch schon mal "edit.text" anstelle der URL eingegeben hatte und es nicht funktioniert hat , aber mit "PChar(edit.text)" hab ichs natürlich noch nicht probiert :lol: .

thx a lot

pacman1986 16. Mai 2006 23:26

Re: Link aus Edit-Feld öffnen
 
:oops: tschuldigung is schon spät ^^


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:22 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz