ich habe ein Problem mit Delphi (3 Standard). Ich möchte in
meine Anwendungim Info Feld einen Link auf meine Homepage
setzen, wie das ja heute so üblich ist. Man kennt das ja aus
vielen Shareware-Programmen. Also einfach einen Text z.B.
„Besucht mich im Internet“, der Blau unterlegt is.Wenn man auf
dieses Feld klickt, soll der Standardbrowser und mit ihm die
Seite geöffnet werden.
Hi Matthias,
erzeuge ein banales Label irgendwo in Deinem Info-Fenster, und stell den Font auf den „amtlichen Look“ (blau + unterstrichen) ein. Wenn Du’s ganz professionell willst, stellst Du zusätzlich noch das Cursor-Property so ein, daß der Pfeil zu ner Hand wird, wenn Du auf dem Label bist.
Im OnClick-Ereignis des Labels rufst Du nun die ShellExecute-Funktion (und keine andere!
) wie folgt auf:
ShellExecute
(Self.Handle,
NIL,
PChar('http://www.wer-weiss-was.de'),
NIL,
NIL,
SW\_SHOWNORMAL);
wobei statt „SW_SHOWNORMAL“ evtl. auch „SW_SHOWMAXIMIZED“ in Frage kommt. Die WWW-Adresse kannst Du natürlich auch in ne extra String-Konstante „auslagern“ (erleichtert spätere Wartung des Programms).
Die Funktion „ShellExecute“ ist in der Unit ShellAPI definiert, welche Du in der USES-Liste des entsprechenden Formulars einbinden mußt.
Die EMail-Adresse erfordert übrigens nur eine kleine Änderung:
(ansonsten alles wie oben, nur)
PChar('MAILTO: [...]@[...]')
Ich hoffe, ich konnte Dir helfen.
Mit freundlichem Gruß
Martin