WEB相談室

Webページ作成に関しての何でも掲示板です。

タイトル:任意のセルに文字表示

0:[投稿] はたぼう [2002/08/14 09:41 ][環境:WIN+IE わからない]

はじめまして、はたぼうです。
セルへの表示方法で検索しているうちにここへたどり着きました。
すごくよく似た質問はあったのですが、私の解決には
いたりませんでした。

早速ですが、質問させて下さい。
あるテーブルのセルをダブルクリックしたときに、そのセルに
TEXTAREAを表示します。そのTEXTAREAに入力された
文字をダブルクリックされたセルに表示したいのです。

以下にソースを記載させて頂きますが、その他の質問も
含めてまとめてみます。

1.セルをダブルクリックした時のTEXTAREAのサイズを
  セルに合わせるには?
2.TEXTAREAの文字列をセルに表示するには?(上記の件)

非常に長くなって申し訳ございませんが、
どなたかご教授ください。
よろしくお願いします。

///////////////////////////////////////////////////////
<HTML>
<HEAD>
<TITLE></TITLE>
<SCRIPT LANGUAGE="VBScript">
function DspText()

    dim el
    dim tx
    dim st

    set el = window.event.srcElement
    IF el.tagname<>"TD" then
        exit function
    end if
    tx = el.innerText
    st = "<textarea style='overflow:hidden' name='crtText' onBlur='DelText()'>" & tx & "</textarea>"
    el.innerHtml = st
    document.all("crtText").focus()
end function
function DelText()

    dim el
    dim tx

    set el = window.event.srcElement
    tx = el.innerText
    document.all("crtText").outerHTML=""
end function
</SCRIPT>
</HEAD>
<BODY>
<FORM name="frmA">
<TABLE NAME="tblA" ID="A" BORDER=3 width=600>
    <TR>
        <TD onDblClick=DspText()>〜〜〜1〜〜〜</TD>
        <TD onDblClick=DspText()>〜〜〜2〜〜〜</TD>
    </TR>
    <TR>
        <TD onDblClick=DspText()>〜〜〜3〜〜〜</TD>
        <TD onDblClick=DspText()>〜〜〜4〜〜〜</TD>
    </TR>
    <TR>
        <TD onDblClick=DspText()>〜〜〜5〜〜〜</TD>
        <TD onDblClick=DspText()>〜〜〜6〜〜〜</TD>
    </TR>
</TABLE>
</FORM>
</BODY>
</HTML>


1:[回答] ナン [2002/08/16 13:38 ]

たぶん無理でしょう。
TD要素の幅widthと高さheightのプロパティに値が設定されていない模様です。

回答(必須): 状態:

お名前(必須):

e-mail:

URL:




[戻る]

ChaichanPAPA's World