Elm 0.17以降のキーボードの組み合わせ

Question

Elmアプリケーションにキーボードの組み合わせを組み込むにはどうすればいいですか？ "shift + alt + enter"？あなたは、このような何かが（エンターキーなど）を押す1つのキーに反応するだろう：

import Keyboard 

type Msg 
    = KeyDown Keyboard.KeyCode 

type alias Model = 
    ... 

update msg model = 
    case msg of 
     KeyDown key -> 
      handleKeyDown key model 

subscriptions model = 
    Sub.batch 
     [ 
      Keyboard.downs KeyDown 
     ] 

handleKeyDown key model = 
    case key of 
    13 -> -- Enter key 
     Debug.log "Other key" 
     model 

    _ -> -- Any other key 
     Debug.log "Other key" 
     model 


view model = 
    ... 

しかし、どのように押された複数のキーのために同じことを行うことができますか？

Answer 1

上記のpdoherty926とSetとしてKeyboard.downsを使用して、どのキーが押されたかを把握できます。キーがリリースされた時期を知るには、Keyboard.upsを参照する必要があります。ここで

は実施例である：the documentationから

import Html exposing (..) 
import Html.App exposing (program) 
import Keyboard exposing (..) 
import Set exposing (Set) 
import Char 

main = 
    program { init = (initialModel, Cmd.none), view = view, update = update, subscriptions = subscriptions } 

initialModel = 
    { keysDown = Set.empty 
    } 

view : Model -> Html Msg 
view model = 
    text <| toString <| Set.map Char.fromCode model.keysDown 

type Msg 
    = KeyDown KeyCode 
    | KeyUp KeyCode 

type alias Model = 
    { keysDown : Set KeyCode 
    } 

update msg model = 
    case msg of 
    KeyDown key -> 
     ({ model | keysDown = Set.insert key model.keysDown }, Cmd.none) 
    KeyUp key -> 
     ({ model | keysDown = Set.remove key model.keysDown }, Cmd.none) 

subscriptions _ = 
    Sub.batch 
     [ Keyboard.downs KeyDown 
     , Keyboard.ups KeyUp 
     ] 

Answer 2

：

長期的には、キーの組み合わせやカップルの他の一般的なシナリオを追跡するために理にかなっています。このライブラリがより直接的に対処できると思われる特定の問題がある場合は、その問題をSSCCEとして記述してください。解決策を提案しないでください。シナリオを説明するだけです。人々が何をしているかが明確になると、一貫した方法でそれらのケースのサポートを追加する時が来ます。

少なくとも、現在サポートされていないことを意味します。この後の追加を奨励するために問題を開くべきかどうかも十分にはわかっていません。

チャドの答えは、私にとっては一時的な解決策のようです。スウレットの提案では、いくつかの修飾キーのみをトラッキングするほうが優れています。この手法をとった場合、ListまたはSetに頼る必要はありませんが、代わりに4ブール値の小さなレコードを持つことができます。

最後に、すべてのキーを追跡する理由がある場合（たとえば、ユーザーが[F1]を何らかのアクションにリンクできるようにするには、パフォーマンス面でより効率的な方法例えば、有限集合の任意の部分集合は、単一の数として定義することができ、各ビットはある特定の要素の存在または不存在を意味するブール値である。Bitwiseライブラリでこのようなことを行うことができる。