Is editing text

4D v20 R7

Is editing text


Is editing text -> 戻り値

引数	型	説明
戻り値	ブール	テキストが入力されているならTrue、それ以外ならFalse

説明

Is editing text は、ユーザーが入力フォームオブジェクトに値を入力中であればTrue を、それ以外の場合にはFalse を返します。

このコマンドは、(入力可能または入力不可能の)リストボックス内のOn Before Keystroke フォームイベントでトリガーされたコード内において、実際のユーザーのデータ入力とショートカットキーの使用を区別するために使用することを想定されています。例えば、ユーザーがセルにテキストを入力するためにキーを押しているのか、リストボックスをスクロールしたいのかによって異なるコードを実行したい場合、例えばタイプアヘッド機能を実装したいような場合などです。

注意:

Is editing text コマンドは、入力およびコンボボックスオブジェクト内では常にTrue を返します。
Is editing text コマンドは、他の全てのオブジェクトではFalse を返します。具体的には4D Write Pro および4D View Proエリアでは常にFalse です。

例題

入力可能なリストボックス内において、ユーザーが入力した文字で始まる行を選択できるようにしたい場合を考えます:

 Case of

    :(FORM Event.code=On Before Keystroke) // キーが押された

       If(Is editing text) // テキストが入力されている

  // 一部の文字を無効化する

          If(Keystroke="+")|(Keystroke="-")|(Keystroke="/")|(Keystroke="*")

             FILTER KEYSTROKE("")

          End if

       Else

  // 入力がされていない、スクロールショートカット機能を有効化

          $charCode:=Keystroke

          $char:=Uppercase($charCode) // アクセントを除去

          Case of

             :((($char>="A")&($char<="Z"))|(($char>="0")&($char<="9")))

                ... // 入力された文字または数字で始まる行を選択

             :($charCode>=Left arrow key)&($charCode<=Down arrow key) // 左/右/上/下 矢印キー

                FILTER KEYSTROKE("") // 矢印キーのアクションを無効化

          End case

       End if

 End case

参照

FILTER KEYSTROKE
Get edited text
Type ahead made easy (blog post)