[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();

}

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