如何精确控制doScroll方法的滚动大小？

Question

bug多多，我鼠标滚动不了需要装驱动？

Answer 1

不好意思，代码改了一下<script language=javascript>
var i =1;
function sw()
{
   i = wheel(i);
   getPosition();
   return false;
}
function wheel(count)
{

  if (event.wheelDelta  >= 120)
    doUp();
  if (event.wheelDelta <= -120)
    doDown();return i;
}function doUp()
{
  var src = event.srcElement;
  src.doScroll("scrollbarUp");
}function doDown()
{
    var src = event.srcElement;
  src.doScroll("scrollbarDown");
}function getPosition()
{
var src = event.srcElement
var oTR = src.createTextRange()
var oSel = document.selection.createRange()
var textLength = src.innerText.length
var line, char, total, cl
oTR.moveToPoint(oSel.offsetLeft, oSel.offsetTop)
oTR.moveStart("character", -1*textLength)
cl = oTR.getClientRects()
line = cl.length
total = oTR.text.length
oTR.moveToPoint(cl[cl.length-1].left, cl[cl.length-1].top)
oTR.moveStart("character", -1*textLength)
char = total - oTR.text.length
if (oSel.offsetTop != cl[cl.length-1].top) {line++; char = 0}
else if (src.createTextRange().text.substr(oTR.text.length, 2) == "\r\n") char -= 2;
document.all.msg.innerHTML = "行: " + line +", 列: " + char + ", 第 " + total + " 个字符";
}
</SCRIPT> <TEXTAREA id="Textarea1" style="WIDTH: 484px; HEIGHT: 370px; overflow:hidden; border: solid navy 1px;" name="Textarea1" rows="24" cols="46"
wrap="off" onmousewheel="sw();" onkeydown="getPosition();">1
2
3
4
5
6
7
8
9
0
1
2
3
4
5
6
7
8
9
0
1
2
3
4
5
6
7
8
9
0
1
2
3
4</TEXTAREA>
<div id=msg>memo</div>