';
Html = '';
for( i in Message)
Html += szTR +Message[i] +'';
//-- On rajoute la 1st Ligne pour rotation
Html += szTR +Message[0] +'';
Html += ' ';
ObjWrite( div_, Html);
}
//-----------------
function Msg_Stop(){
if( MsgTimer)
clearTimeout( MsgTimer);
}
//-----------------------
function Msg_Replay(div_){
if( MsgOK){
Msg_Stop();
MsgTimer = setTimeout("DefilHAUT('" +div_ +"')", DelayDefil);
}
}
//-----------------------
function Msg_Begin( div_){
//-- Reinitialisation
OfsY = 0;
DeltaY = 0;
MsgEnCours = 1;
//-- Init des Clipping
Clip.Top = 0;
Clip.Bottom = Clip.Top + MsgClip;
//-- On applique le clipping
ObjSetClipping( div_, Clip.Top, MsgLarg, Clip.Bottom, 0);
//-- On place le div
ObjMoveTo( div_, 0, 0);
ObjShow( div_, 100);
//-- Pause sur message
MsgTimer = setTimeout("DefilHAUT('" +div_ +"')", DelayPause);
}
//-----------------------
function Msg_Start( div_){
//-----------------------
var Obj = null;
var Html= "";
Msg_Stop();
Obj = GetObjet( div_);
if( Obj){
//-- On Récup l'Objet
bFirst = true;
//-- Creation d'un Message unique
Msg_Creer( div_);
//-- Recup. des dimensions
MsgLarg = ObjGetLargeur( div_);
MsgHaut = ObjGetHauteur( div_);
//-- Calcul Hauteur de chaque Message
MsgClip = MsgHaut / MsgNbr;
//-- C'est parti
Msg_Begin( div_);
//-- Return Init OK
return( true);
}
return( false);
}
//-----------------------
function DefilHAUT( div_){
//-----------------------
//-- Incrementation
OfsY += IncY;
DeltaY += IncY;
//-- Init des Clipping
Clip.Top = OfsY;
Clip.Bottom = Clip.Top + MsgClip;
//-- On applique le clipping
ObjSetClipping( div_, Clip.Top, MsgLarg, Clip.Bottom, 0);
//-- On deplace ou replace
ObjMoveTo( div_, 0, -Clip.Top);
//-- On montre si first
if( bFirst){
ObjShow( div_, 100);
bFirst = false;
}
//-- Gestion du deplacement
if( DeltaY < MsgClip){
//-- On y Retourne
MsgTimer = setTimeout("DefilHAUT('" +div_ +"')", DelayDefil);
}
else{
DeltaY = 0;
MsgEnCours ++;
if( MsgEnCours == MsgNbr){
Msg_Begin( div_);
}
else{
MsgTimer = setTimeout("DefilHAUT('" +div_ +"')", DelayPause);
}
}
}
//---------------------------------------
// Fonction à mettre sur onload du
//---------------------------------------
function Msg_Init( where_){
if( DOM){
MsgZone = where_;
Add_Div ('MSG');
MsgOK = Msg_Start('MSG');
}
else
alert("Cette Animation n'est pas supportée par votre navigateur..\nI'm SORRY");
}
//----------------------------------------------------------------
//== INITIALISATION du Message ===================================
//----------------------------------------------------------------
Add_Message( 'Avril 2008 :<\/a> Evoluprint lance une plateforme Web de production...');
Add_Message( 'Mars 2008<\/a> :
Evoluprint renforce son équipe Innovation...');
Add_Message( 'Mars 2008<\/a> :
Evoluprint développe la mise en page en ligne...');
Add_Message( 'Janvier 2008<\/a> :
présence nationale d\'Evoluprint
Evoluprint continue son évolution et sa croissance...');
Add_Message( 'Décembre 2007<\/a> :
mise en place de deux CTP Fuji...');
Add_Message( 'Novembre 2007<\/a> :
Evoluprint expérimente les corrections électroniques...');
Add_Message( 'Septembre 2007<\/a> :
Evoluprint investit dans un nouveau flux pré-presse...');
Add_Message( 'Août 2007<\/a> :
Evoluprint continue sa démarche de protection de l\'environnement...');
Add_Message( 'Juillet 2007<\/a> :
Evoluprint renforce sa force de vente...');
Add_Message( 'Juin 2007<\/a> :
présentation de notre service In\'IT...');
Add_Message( 'Mai 2007<\/a> :
mise en place d\'un EvoluShow...');
Add_Message( 'Avril 2007<\/a> :
le mois des records de vitesse !...');
Add_Message( 'Février 2007<\/a> :
nos solutions sur mesure pour le stockage et l\'expédition...');
Add_Message( 'Janvier 2007<\/a> :
Evoluprint vous présente ses meilleurs vœux pour 2007...');
Add_Message( 'Décembre 2006<\/a> :
critère réactivité...');
Add_Message( 'Novembre 2006<\/a> :
Evoluprint en vidéo...');
Add_Message( 'Octobre 2006<\/a> :
Evoluprint obtient la certification Imprim\'Vert®...');
Add_Message( 'Septembre 2006<\/a> :
les actions sociales d\'Evoluprint...');
Add_Message( 'Août 2006<\/a> :
vos produits traités même pendant vos congés...');
Add_Message( 'Juillet 2006<\/a> :
Evoluprint choisi par La Poste comme site pilote...');
Add_Message( 'Mai 2006<\/a> :
compte-rendu de l\'invitation des élus locaux de notre région...');
Add_Message( 'Mai 2006<\/a> :
mise en place de groupes de réflexion...');
Add_Message( 'Avril 2006<\/a> :
invitation des maires de notre région...');
Add_Message( 'Mars 2006<\/a> :
optimisation de l\'atelier d\'impression numérique...');
Add_Message( 'Janvier 2006<\/a> :
Evoluprint s\'équipe d\'une nouvelle presse 4 couleurs Heidelberg...');
//-- EOF -----------------------------
|