[lazarus] créer un lien vers une page web

créer un lien vers une page web [lazarus] - Delphi/Pascal - Programmation

Marsh Posté le 23-03-2006 à 16:14:23    

Salut,
ben voilà tout est dans le titre, je tourne en rond depuis un moment pour trouver cette fonction et je n'y prviens pas. Je veux juste créer un lien hypertexte sur ma fiche. J'utilise lazarus (a peu près similaire à delphi)
merci ;)

Reply

Marsh Posté le 23-03-2006 à 16:14:23   

Reply

Marsh Posté le 23-03-2006 à 21:16:33    

Salut Doudouill' ;)
 
Il te suffit de placer un composant Label sur ta fiche, d'y écrire le texte du lien  'visitez le site' ou 'http://123456.com/' par ex). Dans la propriété front  du label coche "souligné" et choisi la couleur bleu pour donner un aspect lien web (pas obligatoire :D ).
Dans l'évènement OnClick du label, met:
 

Code :
  1. shellexecute(Handle, 'Open', PChar('http://www.tonsite.tld/'), nil, nil, SW_SHOWNORMAL);


 
Cette commande va ouvrir l'adresse dans le naviguateur par defaut.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed