Enterキーでのフォーカス遷移

[umemura]

Enterキーが押されたイベントは、UIオブジェクトのKeyPressイベントで取得できるので、

この中でTabキーのイベントに変換して流してやればいけそうです。

下記のコードはレコードグリッドのカスタムセルのサンプルです。
cell-spec に設定すると、グリッド内のセルがエンターキーで遷移します。

Code:

{define-class public EnterMoveCell {inherits StandardStringCell}
  
  {constructor public {default}
    {construct-super}
  }
  
  {method public {create-editor}:TextField
    let editor:TextField = {super.create-editor}
    {editor.ui-object.add-event-handler
        {on e:KeyPress do
            
            {if e.value == KeyPressValue.enter
             then
                
                let kp:KeyPress = {KeyPress}
                
                set kp.value = KeyPressValue.tab
                
                set kp.shifty? = e.shift?
                
                {editor.ui-object.enqueue-event
                    kp
                }
                
                {e.consume}
            }
        }
    }
    {return editor}
  }
}

ちなみに、キープレスのイベントをenuqueue-event で発生させていますが、
handle-event だと、NullDereferenceExceptionが出てしまいます。
理由は分かりません。