Passer des params a une appli par un lien internet

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 288 fois - Téléchargée 2 153 fois

Commenter

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
tynzo Messages postés 1 Date d'inscription mardi 2 novembre 2004 Statut Membre Dernière intervention 11 novembre 2007
11 nov. 2007 à 20:17
Bonjour merci pour ton code, pourrais tu m'expliquer comment récupérer les paramêtres dans mon application delphi ?
cs_mike255 Messages postés 120 Date d'inscription mercredi 14 août 2002 Statut Membre Dernière intervention 26 mai 2007
2 juin 2004 à 23:06
Avec la fonction de l'unité System :
function ParamStr(Index: Integer): string;

Index doit être 1 si mes souvenirs sont bons.
TheChikenKiller Messages postés 60 Date d'inscription lundi 24 mars 2003 Statut Membre Dernière intervention 11 février 2007
2 juin 2004 à 11:45
Oups pardon ça a buggé
TheChikenKiller Messages postés 60 Date d'inscription lundi 24 mars 2003 Statut Membre Dernière intervention 11 février 2007
2 juin 2004 à 11:45
Comment l'appli la recupère ?????
TheChikenKiller Messages postés 60 Date d'inscription lundi 24 mars 2003 Statut Membre Dernière intervention 11 février 2007
2 juin 2004 à 11:44
Comment l'appli la recupère ?????
S'inscrire maintenant

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.

Du même auteur (cs_mike255)