/***********************************************
* Pausing updown message scroller- © Dynamic Drive DHTML code library (www.dynamicdrive.com)
* This notice MUST stay intact for legal use
* Visit Dynamic Drive at http://www.dynamicdrive.com/ for full source code
***********************************************/

//configure the below five variables to change the style of the scroller
var scrollerdelay='4000' //delay between msg scrolls. 3000=3 seconds.
var scrollerwidth='100px'
var scrollerheight='125px'
var scrollerbgcolor='#E0E0E0'
//set below to '' if you don't wish to use a background image
var scrollerbackground=''

//configure the below variable to change the contents of the scroller
var messages=new Array()
// messages[0]="<center>Mon C.V.<br><a href='download.php?num=7'><img src='./images/btn_pdf.png' width='80' height='15'></a><br><a href='download.php?num=5'><img src='./images/btn_doc.png' width='80' height='15'></a><br><a href='download.php?num=6'><img src='./images/btn_odt.png' width='80' height='15'></a><br><a href='download.php?num=8'><img src='./images/btn_sxw.png' width='80' height='15'></a></center>"
messages[0]="<font face='Arial'><center><a href='http://www.b-kolors.be/'><img src='./images/misc/b-kolors-90x33.png' width='90' height='33' alt='B-Kolors'>www.b-kolors.be</a><br><br>panneaux publicitaires, lettrage, cartes de visites, a&eacute;rographe ...</center></font>"
messages[1]="<font face='Arial'><center><a href='http://www.freedownloadsplace.com/'><img src='./images/misc/free-downloads-place-Lo.gif' width='90' height='32' alt='Free Downloads Place'>www.freedownloadsplace.com</a><br><br>Demo, freeware et shareware.</center></font>"
messages[2]="<font face='Arial'><center><a href='http://www.angusj.com/delphi/'><img src='./images/misc/delphi-90x33.jpg' width='90' height='33' alt='Delphi related...'>www.angusj.com</a><br><br>des composants freeware pour Delphi.</center></font>"
messages[3]="<font face='Arial'><center><a href='http://www.delphi-gems.com/'><img src='./images/misc/delphi-90x33.jpg' width='90' height='33' alt='Delphi related...'>www.delphi-gems.com</a><br><br>encore des composants dont VirtualTree et GraphicEX.</center></font>"
messages[4]="<font face='Arial'><center><a href='http://www.torry.net'><img src='./images/misc/delphi-90x33.jpg' width='90' height='33' alt='Delphi related...'>www.torry.net</a><br><br><br>Des composants, articles et exemples.</center></font>"
messages[5]="<font face='Arial'><center><a href='http://www.swissdelphicenter.ch/torry/'><img src='./images/misc/delphi-90x33.jpg' width='90' height='33' alt='Delphi related...'>www.swissdelphicenter.ch</a><br><br>Swiss Delphi Center<br>Trucs et astuces pour développeur Delphi.</center></font>"
messages[6]="<font face='Arial'><center><a href='http://www.efg2.com/Lab/Library/Delphi/index.html'><img src='./images/misc/delphi-90x33.jpg' width='90' height='33' alt='Delphi related...'>www.efg2.com</a><br><br>efg's Delphi Reference Library<br>Trucs, astuces, explications et exemples.</center></font>"
messages[7]="<font face='Arial'><center><a href='http://www.jrsoftware.org/'>www.jrsoftware.org</a><br>Inno-Setup<br>Pour créer un executable d'installation.</font>"
///////Do not edit pass this line///////////////////////

var ie=document.all
var dom=document.getElementById

if (messages.length>2)
i=2
else
i=0

function move(whichdiv){
 tdiv=eval(whichdiv)
 if (parseInt(tdiv.style.top)>0&&parseInt(tdiv.style.top)<=5){
  tdiv.style.top=0+"px"
  setTimeout("move(tdiv)",scrollerdelay)
  setTimeout("move2(second2_obj)",scrollerdelay)
  return
 }
 if (parseInt(tdiv.style.top)>=tdiv.offsetHeight*-1){
  tdiv.style.top=parseInt(tdiv.style.top)-5+"px"
  setTimeout("move(tdiv)",50)
 }
 else{
  tdiv.style.top=parseInt(scrollerheight)+"px"
  tdiv.innerHTML=messages[i]
  if (i==messages.length-1)
  i=0
  else
  i++
 }
}

function move2(whichdiv){
 tdiv2=eval(whichdiv)
 if (parseInt(tdiv2.style.top)>0&&parseInt(tdiv2.style.top)<=5){
  tdiv2.style.top=0+"px"
  setTimeout("move2(tdiv2)",scrollerdelay)
  setTimeout("move(first2_obj)",scrollerdelay)
  return
 }
 if (parseInt(tdiv2.style.top)>=tdiv2.offsetHeight*-1){
  tdiv2.style.top=parseInt(tdiv2.style.top)-5+"px"
  setTimeout("move2(second2_obj)",50)
 }
 else{
  tdiv2.style.top=parseInt(scrollerheight)+"px"
  tdiv2.innerHTML=messages[i]
  if (i==messages.length-1)
  i=0
  else
  i++
 }
}

function startscroll(){
 first2_obj=ie? first2 : document.getElementById("first2")
 second2_obj=ie? second2 : document.getElementById("second2")
 move(first2_obj)
 second2_obj.style.top=scrollerheight
 second2_obj.style.visibility='visible'
}