删除textarea光标所在行之二

<textarea id="txt1" style="width:150;height:300">
11111111
22222222
33333333
44444444
55555555
66666666
77777777
88888888
</textarea>
<input type="button" value="DelRow" οnclick="DelRow()"><br>
<script>
 
function DelRow()
{
//先把Textarea的数据分开.按/r/n,就是回车符分开.存成数组.
var str = txt1.value;
arrstr = str.split(//r/n/);
for(var i=0;i<arrstr.length;i++)
{
    arrstr[i]=arrstr[i].concat("/r")
}
//alert(arrstr)
/****** Start  取得当标所在的位置pos   Start********/
txt1.focus();
var currentRange=document.selection.createRange();
var workRange=currentRange.duplicate();
txt1.select();
var allRange=document.selection.createRange();
var pos=0;
while(workRange.compareEndPoints("StartToStart",allRange)>0)
{
  workRange.moveStart("character",-1);
  pos++;
} 
currentRange.select();
/******   End  取得当标所在的位置pos   End**********/
//位置和每行的字符长度相减.当小于零时.取得i的值.也就是对应的数组下标.
for(var j=0;j<arrstr.length;j++)
{
    pos-=arrstr[j].length;
 if(pos<0){arrstr.baoremove(j);break;}
}
//合并数组.并显示. 
txt1.value=arrstr.join("") 
}
//删除数组元素.原数组上操作.
Array.prototype.baoremove = function(dx)
{
    if(isNaN(dx)||dx>this.length){return false;}
    this.splice(dx,1);
}
</script>