[hack]模拟滚轮效果

hufanyun · 发表于 2005-9-5 00:08:16

介绍：大家一定用过鼠标的滚轮吧，那么没有滚轮的朋友也来试试吧

说明：注意：在<body>里加上

onclick="scrollarrow.style.visibility='hidden';scrollcount=0;" ondblclick="showarrow()" onmousemove="scrollall()" onscroll="scrollit()" scroll=yes

复制代码

以下代码加入<head>区域

<script language="JavaScript">
<!--
var scrollcount=0;
var scrollarrowtop;
function showarrow() {
scrollarrow.style.visibility='visible';
scrollarrow.style.left=document.body.scrollLeft+event.clientX-10;
scrollarrow.style.top=document.body.scrollTop+event.clientY-20;
scrollarrowtop=event.clientY;
scrollcount=1;
}
function scrollit() {
if (scrollcount==1)
{
scrollarrow.style.top=document.body.scrollTop+scrollarrowtop-20;
}
}
function scrollall() {
if (scrollcount==1)
{
var newy=document.body.scrollTop+event.clientY-20;
if (newy>scrollarrow.offsetTop) {window.scrollBy(0,(newy-scrollarrow.offsetTop)/10>12?12:(newy-scrollarrow.offsetTop)/10);scrolldown.innerHTML='△';scrollup.innerHTML='▲';}
if (newy<scrollarrow.offsetTop) {window.scrollBy(0,(newy-scrollarrow.offsetTop)/10<-12?-12:(newy-scrollarrow.offsetTop)/10);scrollup.innerHTML='△';scrolldown.innerHTML='▲';}
}
}
// -->
</script>

复制代码

以下代码加入<body>区域

<div id="scrollarrow" style="position:absolute; width:18px; height:29px; z-index:1; left: 540px; top: 30px; visibility: hidden">
<table width="20" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" id=scrollup style="">▲</td>
</tr>
<tr>
<td align="center" id=scrolldown style="filter:flipv;">▲</td>
</tr>
</table>
</div>
双击鼠标，上下拉动看看吧

复制代码

hufanyun · 发表于 2005-9-5 00:08:47

▲可替换

oytktk · 发表于 2005-9-5 00:12:57

你给个演示啊~

freddy · 发表于 2005-9-5 00:23:51

我也要

hufanyun · 发表于 2005-9-5 00:54:48

你如果有滚轮你直接点一下滚轮效果就知道了.

tomsina · 发表于 2005-9-5 03:47:31

支持

freddy · 发表于 2005-9-5 09:27:40

顶！！！

		自动登录	找回密码
密码			立即注册