[zt]如何用Javascript获得TextArea中的光标位置

小弟最近在写一个在线编辑器，UBB版的，由于没有使用弹出窗口，所以，在添加代码的时候，只能添在TextArea的最后面，无法在光标之前插入，于是在网上疯狂的找资料，工夫不负有心人，终于被我找到了如何获得TextArea中的位置，但是如果TextArea中有很多内容的时候，会显得很闪烁。其代码如下。

　　function getPos(obj)
　　{
　　obj.focus();
　　var workRange=document.selection.createRange();
　　obj.select();
　　var allRange=document.selection.createRange();
　　workRange.setEndPoint("StartToStart",allRange);
　　var len=workRange.text.length;
　　workRange.collapse(false);
　　workRange.select();

　　return len;
　　}

　　这时候问题出来了，在obj.select()的时候，会造成闪烁，并且滚动条也无法归位。于是小弟根据自己的需要，将其改写如下：

function getCaret(ZysrID)
{
 var txb = document.getElementById(ZysrID);//根据ID获得对象
 var pos = 0;//设置初始位置
 txb.focus();//输入框获得焦点,这句也不能少,不然后面会出错,血的教训啦.
 var s = txb.scrollTop;//获得滚动条的位置
 var r = document.selection.createRange();//创建文档选择对象
 var t = txb.createTextRange();//创建输入框文本对象
 t.collapse(true);//将光标移到头
 t.select();//显示光标,这个不能少,不然的话,光标没有移到头.当时我不知道,搞了十几分钟
 var j = document.selection.createRange();//为新的光标位置创建文档选择对象
 r.setEndPoint("StartToStart",j);//在以前的文档选择对象和新的对象之间创建对象,妈的,不好解释,我表达能力不算太好.有兴趣自己去看msdn的资料
 var str = r.text;//获得对象的文本
 var re = new RegExp("[\\n]","g");//过滤掉换行符,不然你的文字会有问题,会比你的文字实际长度要长一些.搞死我了.我说我得到的数字怎么总比我的实际长度要长.
 str = str.replace(re,"");//过滤
 pos = str.length;//获得长度.也就是光标的位置
 r.collapse(false);
 r.select();//把光标恢复到以前的位置
 txb.scrollTop = s;//把滚动条恢复到以前的位置
}

//设置光标函数

function setCaret(id,pos)
{
　　var textbox = document.all(id);
　　var r = textbox.createTextRange();
　　r.collapse(true);
　　r.moveStart('character',pos);
　　r.select();
}

　　其实这个不难，但不知道的时候，会搞死人的。我为了实现这个效果，前前后后差不多试了五个小时，妈的。但愿这个对一些兄弟有帮助。