す この 指 定 方 法 を 使 って 5 行 目 の 12 文 字 目 から 18 文 字 目 まで を 色 を 変 え かつボールド 体 に して 強 調 表 示 してみます ( 機 能 /オプション という 部 分 です) そのためには 5.12 から 5.18 ま でに タグ を 設 定 し

Transcription

1 テキスト テキスト( より 引 用 ) 例 text tk_textcopy tk_textcut tk_textpaste コマンド text コマンド 特 有 のオプション 標 準 オプション 文 字 位 置 の 指 定 タグ マーク ウィジットの 埋 め 込 み イメージの 埋 め 込 み 仮 想 イベント ウィジットのコマンド テキストは 複 数 行 にまたがる 文 字 列 の 入 力 を 受 け 付 けます 例 テキストウィジットには 機 能 /オプションが 数 多 く 用 意 されています 例 えば テキストの 一 部 のみフォン トを 変 えたり コピー&ペーストの 機 能 が 用 意 されていたりします そのため 例 を 多 く 揃 えてみます 最 初 は 簡 単 な 例 から (テキストウィジット 中 の 文 面 は この 記 事 のソースです) 1 : set FONT {{MS Pゴシック} 10 normal} 2 : 3 : wm geometry. 200x150 4 : text.t1 -font $FONT 5 : pack.t1 -fill both -expand 1 6 :.t1 insert end {テキストは 複 数 行 にまたがる 文 字 列 の 入 力 を 受 け 付 けます 7 : 8 : * 例 9 : 10 : テキストウィジットには 機 能 /オプションが 数 多 く 用 意 されています 11 : 例 えば テキストの 一 部 のみフォントを 変 えたり 12 : コピー&ペーストの 機 能 が 用 意 されていたりします 13 : そのため 例 を 多 く 揃 えてみます 14 : 15 : 最 初 は 簡 単 な 例 から 16 : (テキストウィジット 中 の 文 面 は この 記 事 のソースです) } 実 行 すると 次 のようになります テキストウィジットですから テキストの 挿 入 と 表 示 ができるのは 当 り 前 ですが これが 基 本 です 4 行 目 でテキストウィジットを 作 って 6 行 目 以 降 で 文 字 列 を 挿 入 しています 文 字 列 を 挿 入 するには insert ウィジットコマンドを 使 えばよいことがわかります また 入 力 テキスト 全 体 を 波 カッコで 囲 んでいるので 改 行 はそのまま 反 映 されます 次 に テキスト 中 の 文 字 位 置 の 指 定 ですが 最 も 簡 単 な 指 定 方 法 は 行 番 号. 文 字 位 置 です つまりドッ トの 前 に 行 番 号 (1から 始 まります) ドットの 後 ろに 文 字 のカラム 位 置 (0から 始 まります) を 指 定 しま

2 す この 指 定 方 法 を 使 って 5 行 目 の 12 文 字 目 から 18 文 字 目 まで を 色 を 変 え かつボールド 体 に して 強 調 表 示 してみます ( 機 能 /オプション という 部 分 です) そのためには 5.12 から 5.18 ま でに タグ を 設 定 し そのタグに 対 してフォントの 指 定 等 を 行 ないます (なお 指 定 位 置 は 実 は 文 字 の 間 にありますので スクリプト 上 は 5.11 ~ 5.19 になります また 水 平 方 向 のスクロールバーを 付 け ていないので テキストウィジットの 幅 で 折 り 返 されていることに 注 意 してください) 1 : set FONT {{MS Pゴシック} 10 normal} 2 : 3 : wm geometry. 200x150 4 : text.t1 -font $FONT 5 : pack.t1 -fill both -expand 1 6 :.t1 insert end {テキストは 複 数 行 にまたがる 文 字 列 の 入 力 を 受 け 付 けます 7 : 8 : * 例 9 : 10 : テキストウィジットには/オプションが 数 多 く 用 意 されています 11 : 例 えば テキストの 一 部 のみフォントを 変 えたり 12 : コピー&ペーストの 機 能 が 用 意 されていたりします 13 : そのため 例 を 多 く 揃 えてみます 14 : 15 : 最 初 は 簡 単 な 例 から 16 : (テキストウィジット 中 の 文 面 は この 記 事 のソースです) } 17 : 18 :.t1 tag add tag :.t1 tag configure tag1 -font {{MS P ゴシック} 10 bold} -foreground #CC0000 上 記 を 実 行 すると 次 のようになります スクリプトの 18 行 目 で tag1 という 名 前 でタグを 設 定 し 19 行 目 で そのタグに 対 してフォントと 色 を 指 定 しています また 日 本 語 も 問 題 なく 扱 えることがわかります 今 度 はコピー&ペーストをしてみます コピー 位 置 はスクリプト 上 でも 指 定 できますが マウスドラッグ で 指 定 して 実 行 してみましょう Tcl/Tk には コピーを 行 なうコマンドとして tk_textcopy pathname ペーストを 行 なうコマンドとして tk_textpaste pathname が 用 意 されています(この 他 に カットを 行 なうものとして tk_textcut pathname というコマンドもあります) 一 番 最 初 の 例 に 対 して 数 多 く 用 意 の 部 分 をマウスでドラッグしておきます コンソールウィンドウ 上 から

3 tk_textcopy.t1 tk_textpaste.t1.t1 mark set insert 3.end tk_textpaste.t1 とコマンドを 打 ち 込 むと 次 のようになります * 例 の 後 にコピーされたことがわかります 3 行 目 の.t1 mark set insert 3.end は 挿 入 位 置 を テキストの 3 行 目 の 行 末 に 設 定 することを 示 します * 上 記 の 例 で tk_textpaste.t1 を2 回 実 行 しています 2 行 目 の tk_textpaste.t1 を 実 行 しないと 1 行 目 の tk_textcopy.t1 の 操 作 の 後 もテキストウィジット 上 に セレクションが 残 っているようで 最 後 の tk_textpaste.t1 を 実 行 したとき コピー 元 の 箇 所 が 消 えてしまいます (つまり コピー&ペーストではなく 移 動 になってしまいます) そのため 2 行 目 のペーストで 同 じ 場 所 に 移 動 して コピーを 保 持 したままセレクションを 消 し insert マーク つまり 挿 入 位 置 を * 例 の 後 に 移 動 してから 改 めてペーストしています なお マウス 操 作 でペースト 箇 所 を 移 動 する ときや テキストウィジットにデフォルトでバインドされている 操 作 (Windows では Ctrl-C でコピー Ctrl-V でペー スト) をキーボードから 行 なう 場 合 などは こんなことに 気 を 付 ける 必 要 はありません 次 の 例 は テキストウィジット 中 に 別 のウィジットを 埋 め 込 む 例 です 1 : set FONT {{MS Pゴシック} 10 normal} 2 : 3 : wm geometry. 200x150 4 : text.t1 -font $FONT 5 : pack.t1 -fill both -expand 1 6 :.t1 insert end {テキストは 複 数 行 にまたがる 文 字 列 の 入 力 を 受 け 付 けます 7 : 8 : * 例 9 : 10 : テキストウィジットには/オプションが 数 多 く 用 意 されています 11 : 例 えば テキストの 一 部 のみフォントを 変 えたり 12 : コピー&ペーストの 機 能 が 用 意 されていたりします 13 : そのため 例 を 多 く 揃 えてみます 14 : 15 : 最 初 は 簡 単 な 例 から 16 : (テキストウィジット 中 の 文 面 は この 記 事 のソースです) } 17 : 18 : button.b1 -text " 機 能 " -font $FONT -command exit 19 :.t1 window create window.b1 上 記 を 実 行 すると 次 のようになります テキスト 中 にボタンが 配 置 されました 18 行 目 で 作 成 したボタンを 19 行 目 で 配 置 しています このよう

4 に pathname window create index -window windowpath とするとテキスト 中 に windowpath で 示 され るウィジットを 埋 め 込 むことができます ほとんど 同 じようにしてイメージも 埋 め 込 むことができます ( 以 下 は ICONS のアイコンを 利 用 しました) 1 : set FONT {{MS Pゴシック} 10 normal} 2 : 3 : wm geometry. 200x150 4 : text.t1 -font $FONT 5 : pack.t1 -fill both -expand 1 6 :.t1 insert end {テキストは 複 数 行 にまたがる 文 字 列 の 入 力 を 受 け 付 けます 7 : 8 : * 例 9 : 10 : テキストウィジットには/オプションが 数 多 く 用 意 されています 11 : 例 えば テキストの 一 部 のみフォントを 変 えたり 12 : コピー&ペーストの 機 能 が 用 意 されていたりします 13 : そのため 例 を 多 く 揃 えてみます 14 : 15 : 最 初 は 簡 単 な 例 から 16 : (テキストウィジット 中 の 文 面 は この 記 事 のソースです) } 17 : 18 : image create photo appsheet16 -data { 19 : R0lGODlhEAAQAIIAAPwCBAQCBAT+/Pz+/KSipPz+BAAAAAAAACH5BAEAAAAA 20 : LAAAAAAQABAAAANFCBDc7iqIKUW98WkWpx1DAIphR41ouWya+YVpoBAaCKtM 21 : orfsyue8wgc3yxbii5+rtiewmasfddvs6grtkfca7uk6ah8cach+aenyzwf0 22 : ZWQgYnkgQk1QVG9HSUYgUHJvIHZlcnNpb24gMi41DQqpIERldmVsQ29yIDE5 23 : OTcsMTk5OC4gQWxsIHJpZ2h0cyByZXNlcnZlZC4NCmh0dHA6Ly93d3cuZGV2 24 : ZWxjb3IuY29tADs= 25 : } 26 : 27 :.t1 image create image appsheet16 上 記 を 実 行 すると 次 のようになります 最 後 の 例 は undo( 元 に 戻 す 操 作 )と redo(やり 直 す 操 作 )です この 機 能 を 使 うためには オプション -undo を true に 設 定 しなければなりません 1 : set FONT {{MS Pゴシック} 10 normal} 2 : 3 : wm geometry. 200x150 4 : text.t1 -font $FONT -undo 1; # undo オプションを 有 効 にする 5 : pack.t1 -fill both -expand 1 6 :.t1 insert end {テキストは 複 数 行 にまたがる 文 字 列 の 入 力 を 受 け 付 けます 7 : 8 : * 例 9 : 10 : テキストウィジットには 機 能 /オプションが 数 多 く 用 意 されています 11 : 例 えば テキストの 一 部 のみフォントを 変 えたり 12 : コピー&ペーストの 機 能 が 用 意 されていたりします 13 : そのため 例 を 多 く 揃 えてみます 14 : 15 : 最 初 は 簡 単 な 例 から 16 : (テキストウィジット 中 の 文 面 は この 記 事 のソースです) }

5 を 実 行 し(4 行 目 で -undo オプションを true にしています) テキストウィジット 上 でキーボードから 適 当 に 編 集 します 次 のようになったとします ( ここに 適 当 に 文 字 列 を 追 加 してみました という 部 分 で す) ここで コンソールウィンドウから 次 のウィジットコマンドを 入 力 します.t1 edit undo すると 次 のようになります undo されているのがわかりますね ( 文 字 列 を 追 加 してみました の 部 分 が 無 くなっています) さらに.t1 edit redo とすると undo された 分 を 再 実 行 します ウィジットコマンドだけで 簡 単 に 実 行 できます 以 上 で 例 は 終 わりですが テキストウィジットがいろいろな 機 能 を 持 っていることがわかったと 思 います text tk_textcopy tk_textcopy tk_textcut tk_textcut tk_textpaste tk_textpaste コマンド ここで text コマンドの 形 式 を 示 します コマンド 書 式 説 明 textpathname?options? 第 1 引 数 にはテキストウィジットとして 使 われるパス 名 を 指 定 する options の 部 分 にはいくつかの ウィジット 標 準 オプションと text コマンド 特 有 のオプションを 指 定 できる どのようなオプショ ンがあるかについては 以 下 で 解 説 する つまり text に 続 けてドット 区 切 りのウィジット 名 オプション というように 記 述 します この 他 コピー カット ペースト 専 用 のコマンドがあります コマンド tk_textcopy pathname 書 式 説 明 第 1 引 数 にはテキストウィジットパス 名 を 指 定 する 現 在 選 択 されている 部 分 がクリップボードに コピーされる

6 コマンド 書 式 説 明 tk_textcut pathname 第 1 引 数 にはテキストウィジットパス 名 を 指 定 する 現 在 選 択 されている 部 分 がクリップボードに コピーされ かつテキストウィジット 上 から 削 除 される コマンド 書 式 説 明 tk_textpaste pathname 第 1 引 数 にはテキストウィジットパス 名 を 指 定 する 現 在 のクリップボードの 内 容 を 現 在 の 挿 入 位 置 にペースト( 貼 り 付 け)する text コマンド 特 有 のオプション text コマンド 特 有 のオプションには 以 下 のものがあります -autoseparators value 値 としてブーリアン 値 を 指 定 します undo を 実 行 するとき どの 単 位 で 区 切 るか という 問 題 があ りますが ( 上 記 の 例 では 1 行 分 まとめて undo されました) このオプションが true だと 区 切 り を 自 動 的 に 挿 入 します (これがデフォルトです) undo の 単 位 を 自 分 で 設 定 したいときは false に します この 場 合 は 後 述 の edit separator ウィジットコマンドで 設 定 することになります -height value 高 さを 文 字 数 で 指 定 します -maxundo value undo の 最 大 回 数 を 設 定 します ゼロまたは 負 の 数 を 設 定 すると 無 限 の undo を 実 現 することになり ます(これがデフォルトです) -spacing1 value 行 の 前 に 追 加 で 与 える 行 間 距 離 をピクセル 数 で 指 定 します 行 が 自 動 的 に 折 り 返 されている 部 分 には 適 用 されません (つまり 本 当 に 改 行 コードがある 部 分 の 表 示 上 の 距 離 を 設 定 することになります) デフォルトは 0 です -spacing2 value オプション -spacing1 とは 逆 に 自 動 的 に 折 り 返 されている 部 分 の 行 間 を 指 定 します デフォル トは 0 です -spacing3 value 行 の 後 に 追 加 で 与 える 行 間 距 離 をピクセル 数 で 指 定 します 行 が 自 動 的 に 折 り 返 されている 部 分 には 適 用 されません デフォルトは 0 です -state value normal または disabled を 指 定 します disabled を 指 定 すると 編 集 できなくなります (カーソルも 表 示 されなくなります) デフォルトは normal です -tabs list タブの 位 置 をリスト 形 式 で 指 定 します 例 えば -tabs { } とすると 5ピクセル 10ピクセ ル 15ピクセル... の 位 置 にタブストップを 設 定 します (これ 以 降 は 最 後 の 間 隔 が 繰 り 返 されます) 単 位 を 指 定 しないとピクセル 数 となります Tcl/Tk は 単 位 指 定 方 式 として c i m p の4 種 を 用 意 していますが -tabs {5c 10c 15c 20c} だと 5cm 10cm... -tabs {5i 10i 15i 20i} だと 5インチ 10インチ... -tabs {5m 10m 15m 20m} だと 5mm 10mm... -tabs {5p 10p 15p 20p} だと 5ポイン ト 10ポイント (ポイントは 1/72 インチ)... になってしまうので 文 字 数 での 指 定 ができません font コマンドでフォント 情 報 を 取 得 してやればできそうな 気 もするのですが... 試 していません 本 オプションを 指 定 しないか または 空 文 字 列 を 指 定 すると デフォルトの 設 定 (8 文 字 ごと)になりま す -undo value 値 としてブーリアン 値 を 指 定 します undo 機 能 を 有 効 にするなら 真 にします デフォルトは 偽 です -width value 幅 を 文 字 数 で 指 定 します

7 -wrap value 1 行 がウィジットの 幅 に 収 まらないときの 表 示 方 法 を 指 定 します 指 定 できる 値 は none char word の 3 種 です none は 収 まらなくても 改 行 しないことを 示 し char は 文 字 単 位 で 折 り 返 すことを 示 し word は 単 語 単 位 で 折 り 返 すことを 示 します デフォルトは char です 標 準 オプション text コマンドに 対 して 使 える 標 準 オプションには 以 下 のものがあります ウィジット 標 準 オプション に て 解 説 してありますので そちらを 参 照 してください -background または -bg -borderwidth または -bd -cursor -exportselection -font -foreground または -fg -highlightbackground -highlightcolor -highlightthickness -insertbackground -insertborderwidth -insertofftime -insertontime -insertwidth -padx -pady -relief -selectbackground -selectborderwidth -selectforeground -setgrid -takefocus -xscrollcommand -yscrollcommand 文 字 位 置 の 指 定 例 題 で 行 番 号. 文 字 位 置 という 指 定 方 法 を 示 しましたが 実 際 には 多 様 な 方 法 が 用 意 されています 一 般 的 には base? modifier modifier modifier...? という 形 式 になり base の 部 分 が 必 須 で modifier がオプションでいくつ 指 定 してもよい という 形 に なります base の 部 分 は 次 の 表 記 を 受 け 付 けます line.char 例 でも 使 用 した 通 り 行 番 号 と 文 字 位 置 で 指 定 する 方 法 です 行 は 1 から 始 まり 文 字 位 置 は 0 から 始 まります 文 字 位 置 として end という 表 現 も 使 え その 場 合 は 行 末 という 意 味 x,y x,y 座 標 (ピクセル 表 現 )の 位 置 を 示 します

8 end テキストの 末 尾 ( 最 後 の 改 行 の 次 )を 示 します mark mark という 名 前 で 名 前 付 けされたマーク 位 置 を 示 します マークについては 後 述 します tag. first tag でタグ 付 けされた 部 分 の 最 初 の 文 字 を 示 します tag. last tag でタグ 付 けされた 部 分 の 最 後 の 文 字 (の 次 )を 示 します pathname 埋 め 込 まれたウィジットの 位 置 を 指 定 します imagename 埋 め 込 まれたイメージの 位 置 を 指 定 します 次 に modifier の 部 分 は 次 の 表 記 を 受 け 付 けます + count chars base よりも count 文 字 分 後 を 示 します - count chars base よりも count 文 字 分 前 を 示 します + count lines base よりも count 行 分 後 を 示 します - count lines base よりも count 行 分 前 を 示 します linestart base の 行 頭 を 示 します lineend base の 行 末 を 示 します wordstart base の 位 置 を 含 む 単 語 の 先 頭 を 示 します wordend base の 位 置 を 含 む 単 語 の 最 後 (の 次 )を 示 します 例 えば.t1 mark set insert {1.3 +3char +4lines} とすれば 第 1 行 の3 文 字 目 を 基 準 にして そこから4 行 下 のさらに3 文 字 後 にカーソルを 移 動 することを 示 します タグ テキスト 中 のある 文 字 (あるいは 文 字 範 囲 )に 対 して タグ という 目 印 を 付 けることができます 冒 頭 の 例 では タグに 対 してフォントや 色 を 設 定 する 例 を 示 しました これも 含 めて タグには 次 の3つの 役 割 を 持 たせることができます フォントや 色 など 表 示 形 式 を 制 御 する イベントを 関 連 付 ける 例 えばある 範 囲 をクリックすると 何 かが 起 こるようにする セレクション(コピー/ペーストなどで 利 用 する 選 択 のこと)の 表 現 用 タグは 結 構 柔 軟 にできていて テキスト 内 の 複 数 の 箇 所 に1つのタグを 付 けたり テキスト 内 の 同 じ 箇 所 に 複 数 のタグを 付 けたりすることもできます そのような 場 合 タグが 重 複 することがあるので どの 設 定 を 利 用 するかを 判 断 するために タグには 優 先 順 位 があります デフォルトでは 後 から 作 ったタグの 方 が 優 先 度 が 高 い というルールが 働 きます このとき 単 にタグが 指 定 する 設 定 が 優 先 度 の 低 い 方 を 完

9 全 に 覆 い 隠 してしまうのではなく 例 えば.t1 tag add tag t1 tag configure tag1 -font {{MS Pゴシック} 10 bold} -foreground #CC0000.t1 tag add tag t1 tag configure tag2 -foreground #0000CC という 記 述 があったときには tag1 にてゴシック 体 と 赤 が 設 定 されていて まったく 同 じ 箇 所 に 後 から 青 を 設 定 しています このときは 結 果 的 に ゴシック 体 で 青 になります つまり 後 から 設 定 したタグで は 書 体 を 設 定 していないために この 設 定 については 優 先 度 が1つ 下 のものを 利 用 してくれます この 優 先 順 位 を 変 更 するコマンドも 用 意 されています 以 下 はタグに 対 して 設 定 できるオプションです これらは pathname tag configure tagname ウィジッ トコマンドで 設 定 できます -background color 背 景 色 を 設 定 します -bgstipple bitmap ビットマップイメージのパターンで 背 景 を 埋 めます 通 常 は 背 景 色 が 白 なので 背 景 色 を 別 の 色 にし て 本 オプションで 例 えば gray75 などを 指 定 すると 網 かけ 表 示 のようになります -borderwidth pixels 境 界 の 幅 を 指 定 します -relief オプションで 3-D 効 果 を 指 定 していないと 意 味 がありません -elide boolean 真 に 設 定 すると 表 示 から 消 えます データ 上 は 残 っていますので 偽 にすれば 再 び 画 面 に 表 示 されま す -fgstipple bitmap ビットマップイメージのパターンを 前 景 に 使 います -bgstipple と 異 なり 見 栄 えはあまり 良 くあり ません -font fontname フォントを 設 定 します -foreground color 前 景 色 を 設 定 します -justify value left right center のいずれかを 指 定 します それぞれ 左 寄 せ 右 寄 せ センタリング を 示 しま す -lmargin1 pixels 行 頭 の 文 字 にタグが 設 定 されているとき そのタグに 対 して 本 オプションを 指 定 すると その 行 を 指 定 したピクセル 数 だけインデントします -lmargin2 pixels 行 頭 でなくても 表 示 上 画 面 の 左 端 にある 文 字 に 対 してタグが 設 定 されているとき そのタグに 対 して 本 オプションを 指 定 すると その 行 を 指 定 したピクセル 数 だけインデントします -offset pixels ベースラインから 上 下 にどの 程 度 ずらすかを 指 定 します 負 の 数 を 指 定 した 場 合 は 下 にずれます -overstrike boolean 真 のときは 取 り 消 し 線 を 表 示 します -relief value 3-D 効 果 を 指 定 します 標 準 オプションと 同 等 のものが 使 えます -rmargin pixels 表 示 上 の 行 左 端 の 文 字 にタグが 設 定 されているとき そのタグに 対 して 本 オプションを 指 定 すると そ の 行 の 右 端 を 指 定 したピクセル 数 だけインデントします

10 -spacing1 pixels タグのある 行 の 前 に 追 加 で 与 える 行 間 距 離 をピクセル 数 で 指 定 します 行 が 自 動 的 に 折 り 返 されてい る 部 分 には 適 用 されません -spacing2 pixels オプション -spacing1 とは 逆 に 自 動 的 に 折 り 返 されている 部 分 の 行 間 を 指 定 します -spacing3 pixels タグのある 行 の 後 に 追 加 で 与 える 行 間 距 離 をピクセル 数 で 指 定 します 行 が 自 動 的 に 折 り 返 されてい る 部 分 には 適 用 されません -tabs list 表 示 上 の 行 左 端 の 文 字 にタグが 設 定 されているとき そのタグに 対 して 本 オプションを 指 定 すると そ の 行 のタブ 位 置 を 指 定 することになります テキストウィジットに 対 するタブ 指 定 と 同 様 の 形 式 で 指 定 します -underline boolean 下 線 を 表 示 するかどうかを 指 定 します 真 のときは 表 示 します -wrap value ウィジットの 幅 に 収 まらないときの 自 動 改 行 表 示 方 法 を 指 定 します テキストウィジットに 対 する 指 定 と 同 様 に 指 定 できる 値 は none char word の3 種 です マーク マークはタグと 異 なり ある 一 箇 所 に 名 前 を 付 けるものです また 文 字 に 対 して 付 けるのではなく 文 字 と 文 字 の 間 に 設 定 します よって マークは 左 と 右 のどちらの 文 字 にくっついているか を 示 す 属 性 を 持 っています この 属 性 の 値 は left か right かのいずれかですが デフォルトは right ですので マーク 位 置 に 文 字 が 挿 入 されると 挿 入 後 のマークの 位 置 は 挿 入 した 文 字 の 右 側 になります マークを 作 ったり 属 性 を 制 御 するにはテキストのウィジットコマンド pathname mark を 使 います( 後 述 します) マークは 文 字 間 にあるため 前 後 の 文 字 が 削 除 されたとしても 残 ります また タグとは 別 の 名 前 空 間 で 管 理 されているため タグと 同 じ 名 前 を 使 うこともできますが 混 乱 しないように 注 意 しましょう テキストウィジットには 備 え 付 けのマークが2つあって それは 現 在 のカーソル 位 置 を 示 す insert insert と いう 名 前 のマークと 現 在 のマウスの 位 置 を 反 映 している current current という 名 前 のマークです これら のデフォルトで 用 意 されているマークは ウィジットコマンドを 使 っても 削 除 できません カーソル 位 置 が マークという 仕 組 みで 表 現 されているので マークとはどんなものなのかを 想 像 しやすいと 思 います (デ フォルトの 位 置 属 性 が right であることも 理 解 しやすいでしょう カーソル 位 置 に 文 字 を 挿 入 すると カ ーソルは 右 に 移 動 しますね) ウィジットの 埋 め 込 み 冒 頭 の 例 で 示 した 通 り テキストウィジット 中 に 別 のウィジットを 埋 め 込 むことが 可 能 です 埋 め 込 みウ ィジットはテキスト 中 では1 文 字 扱 いです このウィジットを 参 照 するには ウィジットのパスを 用 いる 方 法 と テキスト 中 の 位 置 で 表 現 する 方 法 とがあります 埋 め 込 みウィジットを 含 むテキスト 文 字 列 が 削 除 されたときは その 埋 め 込 みウィジットは 破 棄 されます 埋 め 込 みウィジットはテキストのウィジットコマンド pathname window create を 使 います( 後 述 しま す) また 属 性 を pathname window configure ウィジットコマンドで 制 御 できます ここで 使 える 属 性 を 示 しておきます -align where 埋 め 込 みウィジットの 高 さとテキストの1 行 分 の 高 さが 同 じでないとき どのように 合 わせるかを 指 定 します where に 設 定 できる 値 は top center bottom baseline のいずれかです デフォルトは center です -padx pixels

11 埋 め 込 みウィジットの 横 方 向 のパディングを 指 定 します -pady pixels 埋 め 込 みウィジットの 縦 方 向 のパディングを 指 定 します -stretch boolean 埋 め 込 みウィジットの 高 さが1 行 の 高 さよりも 小 さい 場 合 埋 め 込 みウィジットを 高 さ 方 向 に 伸 ばすか どうかを 指 定 します true だと 伸 ばし false だと 伸 ばしません デフォルトは false です -window pathname 埋 め 込 みウィジットのパスを 指 定 します イメージの 埋 め 込 み ウィジットの 埋 め 込 みとほとんど 同 様 です イメージを 作 った 後 テキストのウィジットコマンド pathname image create index -image イメージ 名 を 使 えばイメージを 埋 め 込 むことができます 同 じイメージを 複 数 箇 所 に 埋 め 込 むことができますので それぞれの 埋 め 込 みイメージには イメージ 名 とは 別 のユニークな 名 前 埋 め 込 みイメージ 名 が 付 けられます 通 常 は 自 動 的 に 名 前 が 付 けられ 上 記 pathname image create index -image イメージ 名 の 返 り 値 で 返 されます 1つのイメージに 対 し て 埋 め 込 みイメージが1つなら デフォルトではイメージ 名 と 同 じ 名 前 ですが 同 じイメージを 複 数 箇 所 に 埋 め 込 むと イメージ 名 イメージ 名 #1 イメージ 名 #2... のように #nn が 後 に 付 けられま す 自 分 で 埋 め 込 みイメージ 名 を 付 けたい 場 合 は -name オプションを 使 います 以 下 はウィジットコマンド pathname image configure などで 使 えるオプションです -align where 埋 め 込 みイメージの 高 さとテキストの1 行 分 の 高 さが 同 じでないとき どのように 合 わせるかを 指 定 し ます where に 設 定 できる 値 は top center bottom baseline のいずれかです デフォルトは center です -image image 埋 め 込 みイメージの 名 前 を 指 定 します -name imagename 埋 め 込 みイメージの 埋 め 込 みイメージ 名 を 指 定 します -padx pixels 埋 め 込 みイメージの 横 方 向 のパディングを 指 定 します -pady pixels 埋 め 込 みイメージの 縦 方 向 のパディングを 指 定 します 仮 想 イベント テキストウィジットにはデフォルトで 仮 想 イベント が2つ 定 義 されています (イベント 関 係 の 詳 細 に ついては イベント 処 理 を 参 照 してください) 1つは <<Selection>> で もう1つは <<Modified>> です <<Selection>> はセレクションが 作 られたり 変 化 したりすると 発 生 します <<Modified>> はテキストウィ ジットの 内 容 に 変 化 があると 発 生 します したがって bind.t1 <<Selection>> {スクリプト} のよう にすると 特 定 の 動 作 を 起 動 することができます <<Selection>> はテキストの -exportselection オプショ ンが true のとき <<Modified>> は pathname edit modified ウィジットコマンドで true が 設 定 さ れているときに 有 効 です (デフォルトではどちらも true です) と リファレンスマニュアルにあるのですが <<Selection>> の 方 はともかく <<Modified>> の 方 はちょっと 変 な 反 応 を 示 します Windows 版 だけの 問 題 かな?... ウィジットのコマンド テキストウィジットを text pathname?options? として 生 成 した 後 は pathname をコマンドとして

12 使 えます この 場 合 のコマンドは 次 の 形 式 になります コ マ ン ド 書 式 説 明 pathname option?arg arg...? テキストウィジットのウィジットコマンド オプションについては 以 下 で 解 説 する pathname bbox index 該 当 する 文 字 のウィンドウ 上 でのピクセル 座 標 をリストで 返 します 最 初 の2つの 数 値 は 文 字 の 左 上 の 座 標 です 最 後 の2つの 数 値 は 幅 と 高 さを 示 します pathname cget option option で 示 すオプションの 値 を 返 します 例 えば.t1 cget -bg とすると SystemWindow とい う 値 が 返 されたりします pathname compare index1 op index2 2つのインデックス 位 置 が 指 す 場 所 の 位 置 関 係 を 判 定 します op として 使 えるのは <, <=, ==, >=, >,!= です 例 えば == なら 2つのインデックスが 同 じ 文 字 を 指 していれば 1 を 返 し 違 えば 0 を 返 します また op が < なら index1 の 方 が index2 よりも 前 であるときに 1 を 返 します pathname configure?option??value option value...? option と value を 指 定 した 場 合 は 指 定 したオプションの 値 を value に 設 定 します option を 指 定 して value を 省 略 した 場 合 は 当 該 オプションの 値 を 返 します オプションもすべて 省 略 した 場 合 は すべての 有 効 なオプションと それに 対 して 設 定 されている 値 のリストを 返 します pathname delete index1?index2...? index1と index2 の 間 の 文 字 を 削 除 します インデックスが1つしか 指 定 されなければ1 文 字 だけ 削 除 します 削 除 範 囲 は 開 始 位 置 と 終 了 位 置 のペアとして 複 数 同 時 に 指 定 できます 同 じ 開 始 位 置 で 終 了 位 置 が 異 なるペアが 指 定 されたときは 長 い 方 が 採 用 されます オーバーラップする2つの 範 囲 が 指 定 されたときは 範 囲 をマージして 削 除 します pathname dlineinfo index index が 指 す 文 字 を 含 む 行 の 情 報 をリスト 形 式 で 返 します リストの 要 素 は5 個 あって 最 初 の2つは 行 の 左 上 の 座 標 です 3 番 目 と4 番 目 の 値 はその 行 の 幅 と 高 さを 表 します 5 番 目 の 要 素 はベースラ インの その 行 の 上 部 から 測 った 位 置 を 表 します いずれも 単 位 はピクセルです 行 の 折 り 返 しモー ド(オプション -wrap)が none のときは もしウィンドウの 右 端 の 外 側 まで 行 が 存 在 するときは そ の 部 分 も 含 めて 計 算 します 行 の 折 り 返 しモード(オプション -wrap)が none 以 外 のときは 自 動 的 に 折 り 返 されている 部 分 ( 表 示 上 2 行 目 以 降 )は 含 まれません 指 定 された 行 が 表 示 されていないと き( 画 面 範 囲 外 のとき) は 空 文 字 列 が 返 されます pathname dump?switches? index1?index2? インデックスで 指 定 した 範 囲 の 内 容 をダンプした 結 果 を 返 します テキスト 文 字 列 だけでなく 設 定 されているタグや 埋 め 込 みウィジットなどの 情 報 も 返 されるのが 特 徴 です index2 を 省 略 したときは index1 が 示 す1 文 字 分 の 情 報 だけが 返 されます ダンプの 形 式 は key1 value1 index1 key2 value2 index2... です key は text text mark tagon tagoff image window のいずれかです value は key のそれぞれに 対 して テキスト 内 容 マーク 名 タグ 名 タグ 名 イメージ 名 ウィジット 名 です switches に 指 定 できるのは -all -command command -image -mark -tag -text -window です デフォルトは -all で すべての 情 報 を 返 します -command は 引 数 を3つ 持 つコマン ド(プロシージャ)を 指 定 して key value index の3つの 組 をそれぞれ 渡 します -image は 埋 め 込 みイメージの 情 報 のみダンプします -mark はマークの 情 報 のみダンプします -tag はタグの 情 報 のみダンプします -text はテキストの 情 報 のみダンプしますが テキスト 情 報 は 改 行 毎 に 別 の 要 素 となり また 改 行 自 体 は 要 素 内 に 含 まれるので 注 意 してください -window は 埋 め 込 みウィジッ トの 情 報 のみダンプします pathname edit modified?boolean? boolean が true のときは 編 集 が 行 なわれる 度 に 変 更 フラグをセットします これは 仮 想 イベント <<Modified>> を 発 生 させます boolean を 省 略 したときは 現 在 の 設 定 を 返 します pathname edit undo 元 に 戻 す 操 作 (アンドゥ)を 行 ないます pathname edit redo

13 やり 直 す 操 作 (リドゥ)を 行 ないます アンドゥ 操 作 を 取 り 消 します pathname edit reset アンドゥ/リドゥの 履 歴 を 消 します pathname edit separator テキストウィジットのオプション -autoseparators が false のときに 使 用 し アンドゥを 行 なう 境 界 を 設 定 します pathname get index1?index2...? インデックスで 示 される 範 囲 の 文 字 列 を 返 します index2 を 省 略 すると index1 で 示 される1 文 字 だ けを 返 します インデックスのペアはいくつでも 指 定 できます pathname image cget index option インデックス 位 置 の 埋 め 込 みイメージのオプションの 値 を 返 します pathname image configure index?option value...? インデックス 位 置 の 埋 め 込 みイメージのオプションの 値 を 返 すか または 設 定 します option と value を 指 定 した 場 合 は 指 定 したオプションの 値 を value に 設 定 します option を 指 定 して value を 省 略 した 場 合 は 当 該 オプションの 値 を 返 します オプションもすべて 省 略 した 場 合 は すべての 有 効 なオプションと それに 対 して 設 定 されている 値 のリストを 返 します pathname image create index?option value...? インデックスの 位 置 に 埋 め 込 みイメージを 埋 め 込 みます pathname image names テキストウィジットに 埋 め 込 まれている 埋 め 込 みイメージ 名 のリストを 返 します pathname index index index が 示 すインデックスを line.char の 形 式 に 変 換 して 返 します pathname insert index chars?taglist chars taglist...? インデックスが 示 す 位 置 に 文 字 列 を 挿 入 します taglist を 指 定 すれば その 文 字 列 に 対 してタグ 名 を 指 定 することができます ここはタグ 名 の リスト ですから 複 数 のタグ 名 を 同 時 に 指 定 すること ができますが その 場 合 は 波 カッコで 囲 みます 挿 入 文 字 列 とタグ 名 リストのペアはいくつでも 指 定 することができます pathname mark gravity markname?direction? マークをどちらに 寄 せるかを 指 定 します direction に 指 定 できるのは left か right のいずれかで す direction を 省 略 した 場 合 は 現 在 の 設 定 を 返 します pathname mark names テキストウィジットに 対 して 設 定 されているマークのリストを 返 します pathname mark next index インデックスが 指 す 位 置 の 次 のマーク 名 を 返 します マークが 無 ければ 空 文 字 列 が 返 されます pathname mark previous index インデックスが 指 す 位 置 の 前 のマーク 名 を 返 します マークが 無 ければ 空 文 字 列 が 返 されます pathname mark set markname index インデックスの 位 置 にマークを 設 定 します まだ 存 在 しないマーク 名 を 使 った 場 合 は 新 しくマーク が 作 られます すでに 存 在 するマーク 名 を 使 った 場 合 は そのマークが 移 動 します pathname mark unset markname?markname markname...? 指 定 したマークを 取 り 除 きます pathname search?switches? pattern index?stopindex? テキスト 内 をサーチします pattern を index 位 置 から stopindex 位 置 までの 間 で 探 します stopindex を 省 略 したときは テキスト 末 までではなく サイクリックに 探 します ( 例 えば テキス ト 末 に 達 したら 先 頭 に 戻 ってサーチ 1 周 するまでサーチを 実 行 します) switches には 次 のもの が 指 定 できます -forwards は 前 方 探 索 です これがデフォルトです -backwards は 後 方 探 索 です -exact pattern に 正 確 に 一 致 するものを 検 索 対 象 とします これがデフォルトです -regexp pattern を 正 規 表 現 とみなします -nocase 大 文 字 / 小 文 字 を 区 別 しません -count varname 変 数 名 を 指 定 しますが マッチした 場 合 マッチ 部 分 の 先 頭 のインデックスと 末 尾 のインデ ックスの 差 を 変 数 に 代 入 します 埋 め 込 みイメージや 埋 め 込 みウィジットが 無 ければ マッチした 文 字 列 の 長 さということになります -elide 隠 されている 文 字 もサーチ 対 象 にします デフォルト

14 では 表 示 されている 文 字 だけがサーチ 対 象 になります -- switches に 続 く pattern がハイフンで 始 まる 場 合 混 乱 を 避 けるために 指 定 します pathname see index インデックスが 示 す 位 置 が 見 えるように 内 容 をスクロールします 指 定 した 位 置 がすでに 見 えている 場 合 は 何 も 起 こりません 指 定 した 位 置 が 少 しだけウィンドウからはずれている 場 合 は その 部 分 が 見 える 位 置 まで 最 小 のスクロールを 行 ないます 大 幅 にウィンドウからはずれている 場 合 は 指 定 した 位 置 がウィンドウの 中 央 にくるようにスクロールします pathname tag add tagname index1?index2 index1 index2...? tagname で 示 されるタグを index1 と index2 の 範 囲 に 関 連 付 けます index2 を 省 略 した 場 合 は index1 が 示 す1 文 字 に 対 してタグが 付 けられます インデックスのペアはいくつでも 指 定 できます pathname tag bind tagname?sequence??script? 指 定 したタグに 対 してイベント 処 理 を 関 連 付 けます bind コマンド のタグ 版 です pathname tag cget tagname option 指 定 したタグのオプションの 値 を 返 します pathname tag configure tagname?option value...? 指 定 したタグのオプションの 値 を 返 すか または 設 定 します option と value を 指 定 した 場 合 は 指 定 したオプションの 値 を value に 設 定 します option を 指 定 して value を 省 略 した 場 合 は 当 該 オ プションの 値 を 返 します オプションもすべて 省 略 した 場 合 は すべての 有 効 なオプションと それ に 対 して 設 定 されている 値 のリストを 返 します pathname tag delete tagname?tagname...? 指 定 したタグを 削 除 します pathname tag lower tagname?belowthis? tagname で 指 定 したタグの 優 先 順 位 を belowthis の 下 にします belowthis を 省 略 したときは 優 先 順 位 を 最 も 下 にします pathname tag names?index? インデックス 位 置 に 関 連 付 けられているタグ 名 のリストを 返 します インデックスを 省 略 した 場 合 は テキストウィジット 内 のすべてのタグ 名 のリストを 返 します リストの 並 び 順 は 優 先 順 位 の 低 いものか ら 順 にソートされて 返 されます pathname tag nextrange tagname index1?index2? index1と index2 の 間 で tagname がタグ 付 けされている 範 囲 を 前 方 に 探 して 返 します index2 を 省 略 したときは テキスト 末 とみなされます 同 じタグ 名 で 複 数 箇 所 に 関 連 付 けることができるので 関 連 付 けた 場 所 を 次 々と 探 したい 場 合 に 使 えます pathname tag prevrange tagname index1?index2? index1と index2 の 間 で tagname がタグ 付 けされている 範 囲 を 後 方 に 探 して 返 します index2 の 方 が index1 よりも 前 に 位 置 します index2 を 省 略 したときは テキストの 先 頭 とみなされます pathname tag raise tagname?abovethis? tagname で 指 定 したタグの 優 先 順 位 を abovethis の 上 にします abovethis を 省 略 したときは 優 先 順 位 を 最 も 上 にします pathname tag ranges tagname 指 定 したタグが 関 連 付 けられている 範 囲 のリストを 返 します pathname tag remove tagname index1?index2 index1 index2...? 指 定 したタグを 取 り 除 きます 取 り 除 く 範 囲 を index1 と index2 のペアで 指 定 します このペアは いくつでも 指 定 できます index2 を 省 略 した 場 合 は index1 で 指 定 した1 文 字 の 分 だけを 取 り 除 き ます pathname window cget index option インデックス 位 置 の 埋 め 込 みウィジットのオプションの 値 を 返 します pathname window configure index?option value...? インデックス 位 置 の 埋 め 込 みウィジットのオプションの 値 を 返 すか または 設 定 します option と value を 指 定 した 場 合 は 指 定 したオプションの 値 を value に 設 定 します option を 指 定 して value を 省 略 した 場 合 は 当 該 オプションの 値 を 返 します オプションもすべて 省 略 した 場 合 は すべての 有 効 なオプションと それに 対 して 設 定 されている 値 のリストを 返 します

15 pathname window create index?option value...? インデックスの 位 置 に 埋 め 込 みウィジットを 埋 め 込 みます pathname window names テキストウィジットに 埋 め 込 まれている 埋 め 込 みウィジット 名 のリストを 返 します pathname xview 2つの 実 数 (0 から 1 の 範 囲 )からなるリストを 返 します これはテキストウィジット 内 にテキスト のどの 部 分 が 見 えているかを 示 します 最 初 の 数 は 見 えている 部 分 の 先 頭 が 行 頭 からどのくらい の 割 合 の 位 置 かを 示 します 2つ 目 の 数 は 見 えている 部 分 の 末 尾 が 行 頭 からどのくらいの 割 合 の 位 置 かを 示 します 例 えば という 値 が 返 ってきた 場 合 見 えている 部 分 の 先 頭 が テキ ストの 行 頭 から 0.1 つまり 10% の 位 置 であることを 示 しています また 見 えている 部 分 の 末 尾 が テキストの 行 頭 から 0.7 つまり 70% の 位 置 であることを 示 しています したがってこの 場 合 は テ キストの 左 端 の 10% が 画 面 のウィジットの 左 外 側 に 隠 れており テキストの 右 端 の 30% が 画 面 のウィ ジットの 右 外 側 に 隠 れていることになります pathname xview moveto fraction fraction の 部 分 で 指 定 する 値 は 0 から 1 の 間 の 実 数 です テキストの 行 頭 からの 位 置 が 指 定 した 割 合 の 位 置 であるような 文 字 をウィジットの 左 端 に 来 るようにします つまり ウィジットの 左 外 側 に 隠 れる 文 字 列 の 割 合 を 指 定 した 割 合 にします pathname xview scroll number what ウィジット 内 の 文 字 列 を 横 方 向 にスクロールします what の 値 は units または pages です number には 整 数 値 を 指 定 しますが what が units なら 指 定 した 文 字 数 だけスクロールします what が pages なら 指 定 したページ 数 だけスクロールします (つまり 画 面 上 に 文 字 が 20 個 表 示 されていれ ば 文 字 20 個 分 スクロールします) number に 負 の 数 を 指 定 すると 逆 の 方 向 にスクロールします pathname yview 2つの 実 数 (0 から 1 の 範 囲 )からなるリストを 返 します これはテキストウィジット 内 に テキス トのどの 部 分 が 見 えているかを 示 します 最 初 の 数 は 見 えている 部 分 の 先 頭 が テキスト 先 頭 (1 行 目 )からどのくらいの 割 合 の 位 置 かを 示 します 2つ 目 の 数 は 見 えている 部 分 の 末 尾 が テキス ト 先 頭 からどのくらいの 割 合 の 位 置 かを 示 します 例 えば という 値 が 返 ってきた 場 合 見 えている 部 分 の 先 頭 が テキストの 先 頭 から 0.1 つまり 10% の 位 置 であることを 示 しています ま た 見 えている 部 分 の 末 尾 が テキストの 先 頭 から 0.7 つまり 70% の 位 置 であることを 示 していま す したがってこの 場 合 は テキストの 上 端 の 10% が 画 面 のウィジットの 上 外 側 に 隠 れており テ キストの 下 端 の 30% が 画 面 のウィジットの 下 外 側 に 隠 れていることになります pathname yview moveto fraction fraction の 部 分 で 指 定 する 値 は 0 から 1 の 間 の 実 数 です テキストの1 行 目 からの 位 置 が 指 定 し た 割 合 の 位 置 であるような 文 字 をウィジットの 上 端 に 来 るようにします つまり ウィジットの 上 外 側 に 隠 れる 行 の 割 合 を 指 定 した 割 合 にします pathname yview scroll number what ウィジット 内 の 文 字 列 を 縦 方 向 にスクロールします what の 値 は units または pages です number には 整 数 値 を 指 定 しますが what が units なら 指 定 した 行 数 だけスクロールします what が pages なら 指 定 したページ 数 だけスクロールします (つまり 画 面 上 に 5 行 表 示 されていれば 5 行 分 ス クロールします) number に 負 の 数 を 指 定 すると 逆 の 方 向 にスクロールします