[Delphi] Link

Ahoj, ucim se programovat v delphi a mam jeden problem. V jednom programku mam aboubox a do toho bych potreboval hodit link, nevite jak na to? Diky
http://antton.wz.cz/link.JPG

Modra farba, underline. A hlavne OnClick event...

Se stydim, ze me to nenapadlo :oops:
Ale diky

Kedysi som niekde nasiel taku peknu procedurku (nieco so ShellExecute), ktora spusti uplne hocico (spustitelny subor, dokument, URL v default prehliadaci).

do Uses pridej ShellApi, pak jak psal Rainbow pridej do tveho textu do udalosti OnClick nazev nove procedury a do ni dej tohle:

Kód:

---

ShellExecute(GetDesktopWindow(), 'open', PChar('mailto:ruzicka@antonin.cz'),
  nil, nil, SW_SHOWNORMAL);

---

nebo

Kód:

---

ShellExecute(GetDesktopWindow(), 'open', PChar('www.seznam.cz'),
  nil, nil, SW_SHOWNORMAL);

---

Neviem, neviem, ci to takto funguje. Ten druhy priklad je urcite zle.

Citace:

---

Původně odeslal Rainbow

Neviem, neviem, ci to takto funguje. Ten druhy priklad je urcite zle.

---

bohuzel funguje :D

Ako rozozna subor "www.seznam.cz" od URL ??? Co to spravi, ked tam das "microsoft.com" alebo "command.com" ???

Dekuji, dekuji, funguje oboji.

Citace:

---

Původně odeslal Rainbow

Ako rozozna subor "www.seznam.cz" od URL ??? Co to spravi, ked tam das "microsoft.com" alebo "command.com" ???

---

musi tam byt www nebo aspon http:// me to tak facha, kdyz tam das treba PChar('c:\boot.ini') tak to otevre (musi tam byt uplna cesta), asi to hleda koncovky v asociacich windows a podle toho to otevre, pokud soubor neexistuje nic to neudela, pokud tam je nerozpoznana pripona z asociaci winu, treba PChar('c:\boot.xyx') nic to neudela

ps: mam Delphi 7 a W2k