// +---------------------------+
// | Liste des modules chargés |
// +---------------------------+

var AL_Liste_librairie;

if (AL_Liste_librairie!=undefined)
  AL_Liste_librairie[AL_Liste_librairie.length]=new AL_Definir_module_librairie("cadre","V2.0");

// +-----------------------------------+

var AL_Liste_cadres;

if (AL_Liste_cadres==undefined)
  AL_Liste_cadres=new Array();
    
function AL_Dessiner_cadre(Bordure,Couleur_fond,Longueur,Hauteur,Zone)
{
  var Tableau='';
  var Longueur_interieure=Longueur-20;
  var Hauteur_interieure=Hauteur-20;

  Tableau='<table cellpadding=0 cellspacing=0 width='+Longueur+' border=0';
  if (Couleur_fond!=null) Tableau=Tableau+' bgcolor="'+Couleur_fond+'"';
  Tableau=Tableau+'><tr>'+
          '<td><img src="'+Bordure+'/hg.gif" width="10" height="10"></td>'+
          '<td><img src="'+Bordure+'/haut.gif" width="'+Longueur_interieure+'" height="10"></td>'+
          '<td><img src="'+Bordure+'/hd.gif" width="10" height="10"></td>'+
          '</tr>'+
          '<tr height="'+Hauteur_interieure+'">'+
          '<td><img src="'+Bordure+'/gauche.gif" width="10" height="'+Hauteur_interieure+'"></td>'+
          '<td height="'+Hauteur_interieure+'">';
              
  if (Zone!=null) Tableau=Tableau+Zone;
      
  Tableau=Tableau+'</td>'+
          '<td><img src="'+Bordure+'/droite.gif" width="10" height="'+Hauteur_interieure+'"></td>'+
          '</tr>'+
          '<tr>'+
          '<td><img src="'+Bordure+'/bg.gif" width="10" height="10"></td>'+
          '<td><img src="'+Bordure+'/bas.gif" width="'+Longueur_interieure+'" height="10"></td>'+
          '<td><img src="'+Bordure+'/bd.gif" width="10" height="10"></td>'+
          '</tr>'+
          '</table>';

  return(Tableau);
}
    
function AL_Creer_cadre(Nom,Bordure,Couleur_fond,X1,Y1,X2,Y2,Zone,Visible)
{
  return(AL_Creer_zone(Nom,X1,Y1,X2-X1,Y2-Y1,
                       AL_Dessiner_cadre(Bordure,Couleur_fond,X2-X1,Y2-Y1,Zone),
                       Visible));
}
    
function AL_Autres_charger_cadre_frame(Page_web)
{
  document.getElementById(this.Nom+"_pg").src=Page_web;
}

function AL_Definir_cadre_frame(Nom,Bordure,Couleur_fond,X1,Y1,X2,Y2,Page_web,Scrolling_bar)
{
  this.Nom=Nom;
  this.X1=X1; this.Y1=Y1; this.X2=X2; this.Y2=Y2;
  
  if (Scrolling_bar==null) Scrolling_bar="auto";
  this.Scrolling_bar=Scrolling_bar;
  
  this.Charger=AL_Autres_charger_cadre_frame;
  
  return(this);
}

function AL_Creer_cadre_frame(Nom,Bordure,Couleur_fond,X1,Y1,X2,Y2,Page_web,Scrolling_bar)
{
  var Tableau='';
  var Longueur_exterieure=X2-X1;
  var Largeur_exterieure=Y2-Y1;
  var Longueur_interieure=X2-X1;
  var Largeur_interieure=Y2-Y1;
  var Cadre=null;
  var Nom_cadre=null;

  if (AL_Liste_cadres[Nom])
    return(null);

  if (Bordure!=null)
  {
    Cadre=new AL_Definir_cadre_frame(Nom,Bordure,Couleur_fond,X1,Y1,X2,Y2,Page_web,Scrolling_bar);
    AL_Liste_cadres[Nom]=Cadre;
    Longueur_interieure-=20;
    Largeur_interieure-=20;
    Nom_cadre=Cadre.Nom;
  }
  else
  {
    Nom_cadre=Nom;
  }
  
  if (Scrolling_bar==null)
    Scrolling_bar="auto";

  if (Bordure==null) 
    Tableau='<div style="position:absolute; top:'+Y1+'; left:'+X1+'; width:'+Longueur_interieure+'; height:'+Largeur_interieure+';">';
  else
    Tableau='';
  Tableau+='<iframe name="'+Nom_cadre+'_pg" id="'+Nom_cadre+'_pg"';
  if (Page_web!=null) Tableau+=' src="'+Page_web+'"';
  Tableau+=' width='+Longueur_interieure+' height='+Largeur_interieure+' scrolling="'+Scrolling_bar+'" frameborder="0"></iframe>';
  if (Bordure==null) Tableau+='</div>';
  
  if (Bordure!=null)
    AL_Creer_cadre(Cadre.Nom,Bordure,Couleur_fond,X1,Y1,X2,Y2,Tableau,true);
  else
    document.write(Tableau);
  
  return(Cadre);
}