java - 如何通过箭头键禁用 JSpinner 的键盘控制？

Question

这是一个关于 Java Swing 的 Clojure 问题，所以来自任何一个阵营的人都可以帮助我。

我正在为我的工作开发一个水文数据可视化程序，我一直在花最宝贵的时间试图弄清楚这个程序。

我的应用程序基于显示图形降水信息。典型用途包括显示美国东南部 24 小时的降雨量数据等任务，程序的内部状态跟踪结束时间和累积降雨量的小时数。

主用户界面由一个主绘图 Pane 、几个微调器和一个状态栏组成(如下所示)。微调器及其标签包含在它们自己的 JPanel 中，但包含绘图 Pane 的 JTextField 和 JPanel 位于 contentPane 的顶层

键绑定(bind)的定义格式如下:

"control S" {:type :function
            :config :configure-shapefiles}
"control Z" {:type :function
             :config :configure-zooms}
"NUMPAD0" {:type :function
          :config :toggle-grids-on}
"VK_DOWN" {:type :function
          :config :prev-day}
"VK_UP" {:type :function
         :config :next-day}
"VK_RIGHT" {:type :function
           :config :next-hour}
"VK_LEFT" {:type :function
           :config :prev-hour}}

此配置图被转换为 JFrame 内容 Pane 的键绑定(bind)，如下所示:

(defn- set-keystroke-shortcuts
  []
  (let [inputmap (.getInputMap (.getContentPane frame) JComponent/WHEN_IN_FOCUSED_WINDOW)
        actionmap (.getActionMap (.getContentPane frame))
        config (merge (read-clj "config/keybindings/site.clj")
                  (if (.exists (File. "config/keybindings/user.clj"))
                    (if-let [my-config ((read-clj "config/keybindings/user.clj") me)]
                       my-config {})))]
    (doseq [[k {shortcut-type :type shortcut-info :config}] config
           :let [sym-name (str (gensym))
                 fun (case shortcut-type
                          :plot #(process-display-config shortcut-info)
                          :function (dealias-keystroke-config-keyword shortcut-info)
                          #{})]]

      (.put inputmap (KeyStroke/getKeyStroke k) sym-name)
      (.put actionmap sym-name (action fun)))))

为了节省空间，我没有包含 dealias-keystroke-config-keyword 和 process-display-config 的代码。我将澄清 :next-day、:prev-day、:next-hour 和 :prev-hour 关键字导致分析的结束时间分别偏移 24、-24、1 和 -1 小时。

我遇到的问题是，我尝试将这些命令绑定(bind)到箭头键时不起作用。每当我将它们绑定(bind)到其他非箭头键时，一切都会按计划进行。但是当我尝试将它们绑定(bind)到箭头键时，“X:”微调器会拦截按键事件并且不会触发...相反，UP 和 DOWN 只会导致 X 微调器上下移动。

如果我禁用微调器，键绑定(bind)会起作用，但这会破坏微调器的目的。如果我禁用微调器，点击箭头键，然后重新启用它们，那么它就可以工作，但我必须通过 REPL 手动禁用它们，然后返回到应用程序窗口，点击箭头键，然后重新启用它们我的回复。不是解决方案。

尝试从微调器中删除键绑定(bind)不会产生太多——它说没有键绑定(bind)!

(.allKeys (.getInputMap x-panes-spinner)) => nil

在这方面，遍历微调器的 child 也无济于事:

(doseq [comp (.getComponents x-panes-spinner)
        k (.allKeys (.getInputMap comp))]
   (prn [(.getName comp) (.getKeyCode k)]))

  => ["Spinner.nextButton" 32]
  => ["Spinner.nextButton" 32]
  => ["Spinner.nextButton" 10]
  => ["Spinner.nextButton" 10]
  => ["Spinner.previousButton" 32]
  => ["Spinner.previousButton" 32]
  => ["Spinner.previousButton" 10]
  => ["Spinner.previousButton" 10]

32 和 10 对应于空格键和回车键，所以这对我没有帮助。

我非常有信心我可以添加一个 MouseListener 以仅在输入微调器时启用/禁用微调器，但我宁愿阻止它们对箭头板事件使用react，而不是让它们动态启用和禁用。

有什么想法吗，StackOverflow？我对此不知所措。

Answer 1

Trying to remove the keybindings from the spinners doesn't yield much -- it says there are no keybindings!

查看 Key Bindings获取每个 Swing 组件的所有绑定(bind)的列表。

以下将禁用微调器的绑定(bind):

InputMap im = spinner.getInputMap(JComponent.WHEN_ANCESTOR_OF_FOCUSED_COMPONENT);
im.put(KeyStroke.getKeyStroke( "DOWN"), "none");
im.put(KeyStroke.getKeyStroke( "UP"), "none");