Passer des params a une appli par un lien internet

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 030 fois - Téléchargée 2 151 fois

Contenu du snippet

Des parametres peuvent etre passes a des programmes par le clique sur un lien...

Exemple : edonkey permet en se connectant a un serveur, de partager des fichiers par internet, si on veut ajouter un serveur on peut le faire manuellement dans le soft mais egalement par un clique sur un lien qui ressemble à "ed2k:|100.100.100.100|9999|"

Source / Exemple :


Si vous voulez ecrire une telle application, vous devez deja choisirle nom de votre protocol de lien (URL protocol) qui est dans l'exemple cite plus haut : ed2k

Ensuite certaines lignes doivent etre ajoutees a la base de registre pour que internet explorer lance le programme si il reconnait le lien
Faites vous un fichier .reg en suivant le modele suivant tiré de edonkey et en remplacant les ed2k par votre propre protocol. N'oubliez pas de specifier le repertoire du programme et si vous le souhaitez, également celui de l'icône

(les lignes precedees de // sont a ignorees)

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ed2k]
@="URL: ed2k Protocol"
"URL Protocol"=""

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ed2k\DefaultIcon]
// icone apparaissant a gauche du lien
@="\"C:\\Program Files\\eDonkey2000\\gdonkey.exe\""

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ed2k\shell]

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ed2k\shell\open]

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\ed2k\shell\open\command]
@="\"C:\\Program Files\\eDonkey2000\\gdonkey.exe\" %1"

Maintenant votre application peut recupere sous forme d'un seul parametre la totalite du lien (y compris ed2k) et le traite en consequence ...

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
mardi 2 novembre 2004
Statut
Membre
Dernière intervention
11 novembre 2007

Bonjour merci pour ton code, pourrais tu m'expliquer comment récupérer les paramêtres dans mon application delphi ?
Messages postés
120
Date d'inscription
mercredi 14 août 2002
Statut
Membre
Dernière intervention
26 mai 2007

Avec la fonction de l'unité System :
function ParamStr(Index: Integer): string;

Index doit être 1 si mes souvenirs sont bons.
Messages postés
60
Date d'inscription
lundi 24 mars 2003
Statut
Membre
Dernière intervention
11 février 2007

Oups pardon ça a buggé
Messages postés
60
Date d'inscription
lundi 24 mars 2003
Statut
Membre
Dernière intervention
11 février 2007

Comment l'appli la recupère ?????
Messages postés
60
Date d'inscription
lundi 24 mars 2003
Statut
Membre
Dernière intervention
11 février 2007

Comment l'appli la recupère ?????
Afficher les 8 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.