Naviguation dans :  Perl  JavaScript  Détail  - load.cgi?Appel=identAdmin
 présentée :  par cas d'appel   par traitements 
Retour à l'accueil
  
   
 Requêtes 

 load – Admin 

 identAdmin 

Requêtes de Ça-déménage.com
Accès professionnel
Identification
 submit | Finer | Errer | Execer | fromClient | toDBase | fromDBase | toClient 
 
 
 Bibliothèque CaD 

 Mise en forme 

 Couleur 

Bibliothèque de Ça-déménage.com
Paramètres de mise en forme
Mise en forme du contenu
 


 Cadre  Tracé d'un cadre
Syntaxe Cadre(bg,fg,flag)
Paramètres 
nom  type  Description 
bg  IN Couleur de fond
fg  IN Contraste ("clair" ou "fonce")
flag  IN Profondeur ("true" en bosse ou "false" en creux)
retourne  OUT Attribut de style
Fonctions util. 
 Couleurs Définition des couleurs


Code Perl 

sub Cadre {local($bg,$fg,$flag) = @_; 
 local($blanc,$noir,$y); 
 if($fg eq "fonce"){ $blanc = $cBfonce; $noir = $cNfonce; 
 }elsif($fg eq "clair"){ $blanc = $cBclair; $noir = $cNclair; 
 }
 if ($flag eq "true") {$y = $blanc; $blanc = $noir; $noir = $y};
 return ' style="background-color:'.$bg.'; border-left:1 solid '.$blanc.'; border-top:1 solid '.$blanc.'; border-right:1 solid '.$noir.'; border-bottom:1 solid '.$noir.'"';
}
Code JavaScript 

function Cadre(bg,fg,flag) { 
 var blanc,noir,y; 
 switch(fg) {
 case "fonce": blanc = cBfonce; noir = cNfonce; break;
 case "clair": blanc = cBclair; noir = cNclair; break;
 }
 if (flag=="true") {y = blanc; blanc = noir; noir = y};
 return ' style="background-color:'+bg+'; border-left:1 solid '+blanc+'; border-top:1 solid '+blanc+'; border-right:1 solid '+noir+'; border-bottom:1 solid '+noir+'"';
}