//pop-up menu - K.U.Leuven Internet Communicatie
//Getest voor IE, NS 4.x, NS 6.x, NS 7.x
//Werkt niet in Opera; alternatieve navigatie voorzien
//contacteer icm@kuleuven.be
var linkset=new Array()
linkset[0]='
'
var ie4=document.all&&navigator.userAgent.indexOf("Opera")==-1
var ns6=document.getElementById&&!document.all
var ns4=document.layers
function bereken_scrollpos (){
if (ie4) {scrollpos=document.body.scrollTop}
if (ns6||ns4) {scrollpos=window.pageYOffset}
}
function showmenu(e,tekst){
if (!document.all&&!document.getElementById&&!document.layers)
return
clearhidemenu()
menuobj=ie4? document.all.popmenu : ns6? document.getElementById("popmenu") : ns4? document.popmenu : ""
menuobj.thestyle=(ie4||ns6)? menuobj.style : menuobj
if (ie4||ns6)
menuobj.innerHTML=tekst
else{
menuobj.document.write(''+tekst+'')
menuobj.document.close()
}
menuobj.contentwidth=(ie4||ns6)? menuobj.offsetWidth : menuobj.document.gui.document.width
menuobj.contentheight=(ie4||ns6)? menuobj.offsetHeight : menuobj.document.gui.document.height
eventX=ie4? event.clientX : ns6? e.clientX : e.x
eventY=ie4? event.clientY : ns6? e.clientY : e.y
//horizontal position of the menu
menuobj.thestyle.left=109
//vertical position of the menu
if (ns6||ie4) {
bereken_scrollpos();
hoogte=scrollpos+eventY;
}
if (ns4) {
hoogte=eventY
}
if (hoogte>107 && hoogte<142) menuobj.thestyle.top=107
if (hoogte>142 && hoogte<177) menuobj.thestyle.top=142
if (hoogte>177 && hoogte<197) menuobj.thestyle.top=177
if (hoogte>197 && hoogte<217) menuobj.thestyle.top=197
if (hoogte>217 && hoogte<237) menuobj.thestyle.top=217
if (hoogte>237 && hoogte<257) menuobj.thestyle.top=237
if (hoogte>257 && hoogte<277) menuobj.thestyle.top=257
if (hoogte>277 && hoogte<297) menuobj.thestyle.top=277
if (hoogte>297 && hoogte<332) menuobj.thestyle.top=297
if (hoogte>402 && hoogte<422) menuobj.thestyle.top=402
menuobj.thestyle.visibility="visible"
return false
}
function contains_ns6(a, b) {
while (b.parentNode)
if ((b = b.parentNode) == a)
return true;
return false;
}
function hidemenu(){
if (window.menuobj)
menuobj.thestyle.visibility=(ie4||ns6)? "hidden" : "hide"
}
function dynamichide(e){
if (ie4&&!menuobj.contains(e.toElement))
hidemenu()
else if (ns6&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
hidemenu()
}
function delayhidemenu(){
if (ie4||ns6||ns4)
delayhide=setTimeout("hidemenu()",500)
}
function clearhidemenu(){
if (window.delayhide)
clearTimeout(delayhide)
}
if (ie4||ns6)
document.onclick=hidemenu
