• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • 用JavaScript實現的文本框光標定位

    發表于:2007-06-21來源:作者:點擊數: 標簽:
    html head meta http-equiv=Content-Type content=text/html; charset=gb2312 meta name=GENERATOR content=Microsoft FrontPage 4.0 meta name=ProgId content=FrontPage.Editor.Document title光標位置/title style INPUT{border: 1 solid #000000} BODY,T

       


    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">

    <meta name="GENERATOR" content="Microsoft FrontPage 4.0">
    <meta name="ProgId" content="FrontPage.Editor.Document">
    <title>光標位置</title>
    <style>
    INPUT{border: 1 solid #000000}
    BODY,TABLE{font-size: 10pt}
    </style>
    </head>
    <body>
    <table border="0" width="700" cellspacing="0" cellpadding="0">
    <tr>
    <td width="479" rowspan="7">
    點擊 TextArea 實現光標定位
    <p>
    <textarea rows="7" cols="49" id="box" onclick=tellPoint()>我怕來不及我要抱著你,直到感覺你的縐紋有了歲月的痕跡,直到視線變得模糊直到不能呼吸
    為了你我愿意
    動也不能動也要看著你,直到感覺你的發線有了白雪的痕跡,直到肯定你是真的直到失去力氣讓我們形影不離
    如果全世界我也可以放棄,至少還有你值得我去珍惜而你在這里就是生命的奇跡
    也許全世界我也可以忘記,就是不愿意失去你的消息你掌心的痣我總記得在哪里
    我們好不容易我們身不由已,我怕時間太快不夠將你看仔細,我怕時間太慢日夜擔心失去你恨不得一夜之間白頭永不分離
    </textarea>

    <script>

    function movePoint()
    {
    var pn = parseInt(pnum.value);

    if(isNaN(pn))
    return;

    var rng = box.createTextRange();

    rng.moveStart("character",pn);

    rng.collapse(true);

    rng.select();

    returnCase(rng)

    }

    function tellPoint()
    {
    var rng = event.srcElement.createTextRange();

    rng.moveToPoint(event.x,event.y);
    rng.moveStart("character",-event.srcElement.value.length)

    pnum.value = rng.text.length

    returnCase(rng)
    }

    function returnCase(rng)
    {
    bh.innerText = rng.boundingHeight;
    bl.innerText = rng.boundingLeft;
    bt.innerText = rng.boundingTop;
    bw.innerText = rng.boundingWidth;
    ot.innerText = rng.offsetTop;
    ol.innerText = rng.offsetLeft;
    t.innerText = rng.text;
    }

    function selectText(sp,ep)
    {
    sp = parseInt(sp)
    ep = parseInt(ep)

    if(isNaN(sp)||isNaN(ep))
    return;

    var rng = box.createTextRange();

    rng.moveEnd("character",-box.value.length)
    rng.moveStart("character",-box.value.length)

    rng.collapse(true);

    rng.moveEnd("character",ep)
    rng.moveStart("character",sp)

    rng.select();

    returnCase(rng);
    }

    var rg = box.createTextRange();

    function findText(tw)
    {
    if(tw=="")
    return;

    var sw = 0;

    if(document.selection)
    {
    sw = document.selection.createRange().text.length;
    }

    rg.moveEnd("character",box.value.length);

    rg.moveStart("character",sw);

    if(rg.findText(tw))
    {
    rg.select();

    returnCase(rg);
    }

    if(rg.text!=tw)
    {
    alert("已經搜索完了")
    rg = box.createTextRange()
    }

    }

    </script>
    </p>
    <p></p>
    光標位置:<input type="text" value="0" id="pnum" size="8"> <input type="button" onclick="movePoint()" value="移動光標到指定位置">
    <p></p>
    選擇指定范圍:<input type="text" size="9" id="sbox"> -- <input type="text" size="9" id="ebox"> <input type="button" onclick="selectText(sbox.value,ebox.value)" value="選擇">
    <p></p>
    選擇查找字符 :<input type="text" value="" id="cbox" size="8"> <input type="button" onclick="findText(cbox.value)" value="查找下一個并選擇">

    </td>
    <td width="217">boundingHeight:&nbsp;<span id="bh"></span></td>
    </tr>
    <tr>
    <td width="217">boundingWidth:&nbsp;<span id="bw"></span></td>
    </tr>
    <tr>
    <td width="217">boundingTop:&nbsp;<span id="bt"></span></td>
    </tr>
    <tr>
    <td width="217">boundingLeft:&nbsp;<span id="bl"></span></td>
    </tr>
    <tr>
    <td width="217">offsetLeft:&nbsp;<span id="ol"></span> </td>
    </tr>
    <tr>
    <td width="217">offsetTop:&nbsp;<span id="ot"></span> </td>
    </tr>
    <tr>
    <td width="217">text:&nbsp;<span style="position: absolute; z-index: 10" id="t"></span> </td>
    </tr>
    </table>
    </body>

    </html>

    原文轉自:http://www.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>