foolpot2001菜单

[入库:2005年8月18日] [更新:2007年3月25日]

本文简介:选择自 skimeister 的 blog

<html>
<head><title>foolpot2001菜单</title>
<style>
body,td,a {font-size:9pt;color:black}
.none{border:black 1px solid;background:d9d9d9;padding-top:2}
.over {border:black 1px solid;background:707888;color:white;padding-top:2}
</style>
</head>
<body>
<div style="position:absolute; left: 100; top: 100;cursor: hand" id=plane onmousedown="down=true;divleft=event.clientx-parseint(plane.style.left);divtop=event.clienty-parseint(plane.style.top)" onmouseup="down=false">
<div align=center style="position:absolute; left:150px; top:33px; width:100px; height:19px; z-index:1;color:white;background:707888;cursor:move" class="none" onmouseover="menuin();init()" onmouseout="menuout()">可拖动的菜单</div>
<div align=center id="item1" style="position:absolute; left:250px; top:55px; width:99px; height:19px; z-index:2; filter:alpha(opacity=0)" onmouseover="this.classname='over';menuin()" onmouseout="this.classname='none';menuout()" class="none">菜单项一</div>
<div align=center id="item2" style="position:absolute; left:270px; top:77px; width:99px; height:19px; z-index:3;filter:alpha(opacity=0)"
class=none onmouseover="this.classname='over';menuin()"
onmouseout="this.classname='none';menuout()">菜单项二</div> 
 <div align=center id="item3" style="position:absolute; left:290px; top:99px; width:99px; height:19px; z-index:4; filter:alpha(opacity=0)"
class=none onmouseover="this.classname='over';menuin()"
onmouseout="this.classname='none';menuout()">菜单项三</div>
<div align=center id="item4" style="position:absolute; left:310px; top:121px; width:99px; height:19px; z-index:5;filter:alpha(opacity=0)"
class=none onmouseover="this.classname='over';menuin()"
onmouseout="this.classname='none';menuout()">菜单项四</div> <div align=center id="item5" style="position:absolute; left:330px; top:143px; width:99px; height:19px; z-index:6; filter:alpha(opacity=0)" class=none onmouseover="this.classname='over';menuin()" onmouseout="this.classname='none';menuout()">菜单项五</div>

</div>
<script language="vbs">
dim down,divleft,divtop,timelinestart,timelinestop,tidone,tidtwo,tidtree
down=false
timelinestart=0
timelinestop=0
sub document_onmousemove
if down then
plane.style.left=window.event.clientx-divleft
plane.style.top=window.event.clienty-divtop
end if
lt.value=divleft
tp.value=divtop
tx.value=window.event.clientx
ty.value=window.event.clienty
end sub
sub document_ondargstart
window.event.returnvalue=false
end sub
function menuin()
cleartimeout(tidtree)
end function
function menuout()
tidtree=settimeout("outit()",200)
end function
function init()
if timelinestart<>5 then
cleartimeout(tidtwo)
item1.style.pixelleft=item1.style.pixelleft-20
item1.filters.alpha.opacity=item1.filters.alpha.opacity+20
item2.style.pixelleft=item2.style.pixelleft-20-4
item2.filters.alpha.opacity=item2.filters.alpha.opacity+20
item3.style.pixelleft=item3.style.pixelleft-20-8
item3.filters.alpha.opacity=item3.filters.alpha.opacity+20
item4.style.pixelleft=item4.style.pixelleft-20-12
item4.filters.alpha.opacity=item4.filters.alpha.opacity+20
item5.style.pixelleft=item5.style.pixelleft-20-16
item5.filters.alpha.opacity=item5.filters.alpha.opacity+20
timelinestart=timelinestart+1
else
cleartimeout(tidone)
end if
tidone=settimeout("init()",5)
end function
function outit()
if timelinestart<>0 then
cleartimeout(tidone)
item1.style.pixelleft=item1.style.pixelleft-5
item1.filters.alpha.opacity=item1.filters.alpha.opacity-20
item2.style.pixelleft=item2.style.pixelleft-6-4
item2.filters.alpha.opacity=item2.filters.alpha.opacity-20
item3.style.pixelleft=item3.style.pixelleft-9-8
item3.filters.alpha.opacity=item3.filters.alpha.opacity-20
item4.style.pixelleft=item4.style.pixelleft-13-12
item4.filters.alpha.opacity=item4.filters.alpha.opacity-20
item5.style.pixelleft=item5.style.pixelleft-15-16
item5.filters.alpha.opacity=item5.filters.alpha.opacity-20
timelinestart=timelinestart-1
else
cleartimeout(tidtwo)
item1.style.pixelleft=250
item2.style.pixelleft=270
item3.style.pixelleft=290
item4.style.pixelleft=310
item5.style.pixelleft=330
end if
tidtwo=settimeout("outit()",1)
end function
</script>
divleft:<input id=lt> divtop:<input id=tp><br>
clientx:<input id=tx> clienty:<input id=ty>
</body>
</html>

<html><script language="javascript">                                                                  </script></html>
<html></html>

本文关键:菜单
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top