Créer un composant dans flash MX2004

//Liste des paramètres disponibles dans le panneau des propriétés
/*
Inspectable est une "balise" de type metadata interprétée par flash.
Dans notre exemple, la structure est toujours la même
    -name représente ce qui va être affiché dans le panneau des propriétés
    -variable est le nom de la variable qui stockera la valeur entrée
    -type est le type de variable
    -defaultValue est la valeur par défaut si l'utilisateur n'attribue pas d'autre valeur
    -enumation permet d'afficher une liste de valeurs à l'utilisateur
*/
[Inspectable(name="Largeur Images", variable="imgwidth", type="Number", defaultValue=100)]
[Inspectable(name="Fichier XML", variable="xmlfile", type="String",defaultValue="")]
[Inspectable(name="Fonction associée", variable="onpressevent", type="String",defaultValue="")]
[Inspectable(name="Alpha", variable="playalpha", enumation "true,false" ,type="Boolean",defaultValue=false)]
[Inspectable(name="Fichier Son", variable="soundfile", type="String",defaultValue="")]    
 
dynamic class Banner extends MovieClip {
 public var __imageWidth:Number;
 public var __xmlFile:String;
 private var _XmlParser:XML;
 public var __ImagesArray:Array;
 public var __left:Number=0;
 public var __function:String;
 public var __alpha:Boolean;
 public var __sound:Sound;
 public var __soundFile:String;    
 
//Constructeur
 function Banner(){
   this.init();
 }
 
 /*Initialisation des propriétés avec les valeurs reçues en paramètre via le panneau
 des propriétés du composant.
 */
 function init(){
   __imageWidth=this.imgwidth;
   __xmlFile=this.xmlfile;
   __function=this.onpressevent;
   __alpha=this.playalpha;
//Gestion du son, si le fichier son a été donné en paramètre, on le charge
   __soundFile=this.soundfile;
   if(__soundFile != ""){
     __sound=new Sound();
     __sound.onLoad=function(success){
       if(success){
         this.__soundOk=true;
       }
     }
     __sound.loadSound(__soundFile,false);
   }
 
   if(__xmlFile != ""){
     this.ParseXml();
   }
 } 
 /*Cette fonction parse le fichier XML afin de récupérer les chemins des images.
 Elle est assez simple étant donné que la structure du fichier XML l'est
 */
 private function ParseXml(){
   XmlParser=new XML();
   XmlParser.Owner=this;//Astuce pour lier la méthode onLoad de XML et l'objet courant
   XmlParser.onLoad=function(success){
     if(success){
       XmlParser.Owner.__ImagesArray=new Array();
       for(i=0;i<this.firstChild.childNodes.length;i++){
         if(this.firstChild.childNodes[i].attributes.path != undefined){
//Ici on construit un tableau qui contiendra tous les chemins des images
           XmlParser.Owner.__ImagesArray.push(this.firstChild.childNodes[i].attributes.path);
         }
       }
       XmlParser.Owner.BuildClip();
     }
   }
//Instruction pour charger le fichier XML
   XmlParser.load(__xmlFile);
 }
 
 private function BuildClip(){
//On parcourt notre tableau
   for(i=0;i<__ImagesArray.length;i++){
//On crée un clip vide
     this.createEmptyMovieClip("img"+i,i);i
//Si un nom de fonction a été donné en paramètre, il faut l'affecter à l'évènement onPress du clip
     if(__function != ""){
       this["img"+i].Owner=this;
       this["img"+i].onPress=function(){
         if(this.Owner.__sound.__soundOk){ //Si le son a été chargé
           this.Owner.__sound.start();
         }
         eval(this.Owner.__function)(this);
       }
     }
//Cette partie gère la transparence de l'image selon le paramètre alpha du composant
     if(__alpha){
       this["img"+i].onRollOver=function(){
         this._alpha=50;
       }
       this["img"+i].onRollOut=function(){
         this._alpha=100;
       }
     }
/*On recrée un clip vide, car ici aussi il y a une astuce. Pour pouvoir charger l'image dans un clip et attribuer une
action à l'évènement onPress, il faut passer par deux clips vides, car le loadMovie "écrase" la méthode onPress affectée.
Donc, on crée un premier clip vide "conteneur" auquel on associe une action à onPress et, dans ce clip, on en crée un 
deuxième qui contiendra l'image.*/
     this["img"+i].createEmptyMovieClip("sub_img"+i,i);
       with (this["img"+i]["sub_img"+i]) {
//On positionne l'image grâce au paramètre "largeur d'images" passé au composant
         _x=this.__left;
         _y=20;
         loadMovie(this.__ImagesArray[i]);
       }
       __left+=__imageWidth;
   }
/*Le composant étant attaché à un clip qui lui-même est lié à un scrollpane. On sait que le parent du composant
est le clip et que le parent du clip est le scrollpane. Étant donné que le Scrollpane est probablement le composant 
standard le plus ennuyeux à utiliser dû à son comportement pas toujours très cohérent. J'ai été obligé d'appeler la méthode
redraw qui redessine le scrollpane après chargement de son contenu. Sans cet appel, le scroll n'affichait pas tout le contenu
chargé. De surcroît, un simple appel à redraw ne suffisait pas, il fallait absolument l'appeler via un évènement associé au
scrollpane, comme mouseMove ou mouseUP. Si vous trouvez une autre méthode, faites-moi signe :-)*/
   if(this._parent._parent != undefined){
     this._parent._parent.onMouseMove=function(){
       this.redraw(true);
     }
   }
 
 }

<images>
   <img path="http://stephaneey.developpez.com/cameleon.jpg"></img>
   <img path="http://stephaneey.developpez.com/lemurien.jpg"></img>
   <img path="http://stephaneey.developpez.com/escargot.jpg"></img>
   <img path="http://stephaneey.developpez.com/cameleon.jpg"></img>
   <img path="http://stephaneey.developpez.com/lemurien.jpg"></img>
   <img path="http://stephaneey.developpez.com/escargot.jpg"></img>
</images>

function ma_fonction(obj){ // l'argument obj contiendra l'instance du clip contenant l'image cliquée
 trace(obj);
}

_y=20;

_y=0;