文字数リアルタイム表示とは私は、ミニコミ雑誌に原稿を依頼されることがあります。この場合、雑誌によって字数が制限されます。字数制限がある原稿の場合、現在書いている文字数をリアルタイムで知りたいと思うことがあります。残念ながら、ワープロには、このリアルタイム字数表示機能がついたものを知りません。そこで桐のフォームに文字数のリアルタイム表示機能をつけられないものか考えました。桐には#文字数と言う関数があり、これによって項目内文字数を読み取り、表示することが出来ます。これは確定表示モードにして初めて機能します。欲しいのは書いている途中で、いちいち表示モードにしないで訂正モード中にリアルタイムで文字数を表示出来る機能です。自分なりに考えてみましたが、結局、歯が立たず、【多遊】さんの掲示板に質問投稿しました。そこで悲しげさんにご教示頂いたのが、以下のイベントです。文字数をリアル表示する項目のテキストオブジェクト名t本文の編集文字列変更イベントをチェックします。編集文字列が変更されるたびに、繰り返し発生します。編集文字列が変更されるということは、おそらく編集文字列が、追加或いは削除されて文字数が変更された場合も含むものとおもわれます。次に文字列型変数の&編集字を作成し、編集文字列が変更されたかどうかを調べるには、このハンドラ内で[編集文字列取得]メソッドを実行します。@t本文.編集文字列取得(&編集字)この記述で、t本文即ち[本文]内の編集文字列を&編集字に代入できます。編集文字列が代入された&編集字の文字数をカウントするのが&文字数=#文字数(&編集字)で、&文字数という変数に&編集字の文字数が代入されます。&文字数は、メイン部分で宣言して作成済みです。&文字数の表示は、t文字数というテキストボックスを配置しておき、このソースとして&文字数を入れておきます。ここに入力毎にリアルタイムに変化する文字数が表示されます。制限文字数を1500字とした場合、それを超えて場合は、超えた部分が表示されないようにする記述が以下の部分です。"文字数が1500を超えました!これ以上入力できません"によって、1500字を超えたことが警告されます。@t本文.編集文字列設定(&編集字)によって、&編集字に1文字から1500文字目までを代入し、&文字数に1500文字を代入し、[本文]オブジェクトの編集文字列を1500字を超える部分を削除された&編集字のデータに置き換えます。これにより1501文字目以降を削除したことになります。@フォーム.変数変更()によって、変数を使用しているフォーム上のオブジェクトを、すべて再描画するよう予約し、予約した再描画は、イベントハンドラがすべて終了したときに実行されます。上記内容で送信する(要チェック)※大変恐縮ながら具体的事件のメール相談は実施しておりません。