ÿþ`Méthode projet: PlugInRegistration
`Appeler Sur Ouverture pour récupérer la clé d enregistrement
`correspondant à l environnement 4D utilisé
`Puis sérialiser le plug-in avec la clé retournée

`Syntaxe:
`C_TEXTE($clé)
`C_ENTIER LONG($résultat)
`$clé:=PlugInRegistration ("Ma clé 1";"Ma clé 2"; &  ; "Ma clé n")
`$résultat:=XX_Register($clé)


C_TEXTE(${1})`Toutes vos clés d enregistrement pour le plug-in
C_TEXTE($0)`La clé correspondant à l environnement 4D utilisé 

C_ENTIER LONG($numéro4D;$utilisateursConnectés;$utilisateursMaxi;$boucle)
C_ALPHA(80;$utilisateurCourant)
C_ALPHA(80;$société)

LIRE INFORMATIONS SERIALISATION($numéro4D;$utilisateurCourant;$société;$utilisateursConnectés;$utilisateursMaxi)`seul le numéro 4D nous intéresse ici

$0:="Aucune clé trouvée pour "+Chaine($numéro4D)`retourne un message d erreur contenant le numéro 4D

Boucle ($boucle;1;Nombre de parametres)`teste toutes les clés jusqu à trouver la bonne
	Si (Position(Chaine($numéro4D);${$boucle})>0)`le numéro 4D est contenu dans la clé d enregistrement du plug-in
		$0:=${$boucle}`retourne la clé recherchée
		$boucle:=Nombre de parametres`inutile de continuer
	Fin de si 
Fin de boucle