何の記事? Clojureの勉強中のためにSwingを使ってCSVエディタのようなものを作っていたときに、 JTableのカラムってどうやって削除するの?って調べてたのでメモ程度に残しておきます。 やり方 TableModelからgetDataVectorでテーブルデータを取得して変更し、再設定します。 TableModelはDefaultTableModelとします。 ;; 2次元のVector中のすべてのVectorから特定のindexの要素を削除する (defn remove-nth [v n] (loop [i 0] (if (= i (.. v (size))) v (do (.. v (elementAt i) (removeElementAt n)) (recur (+ i 1)))))) ;; カラムを削除 ;; ※とりあえずカラム名は適当につけます (defn remov
![Clojure + SwingでJTableのカラムを削除する - Qiita](https://cdn-ak-scissors.b.st-hatena.com/image/square/fb1ff9b36935c52cfa91d567ab56d8b54166367a/height=288;version=1;width=512/https%3A%2F%2Fqiita-user-contents.imgix.net%2Fhttps%253A%252F%252Fcdn.qiita.com%252Fassets%252Fpublic%252Farticle-ogp-background-9f5428127621718a910c8b63951390ad.png%3Fixlib%3Drb-4.0.0%26w%3D1200%26mark64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTkxNiZoPTMzNiZ0eHQ9Q2xvanVyZSUyMCUyQiUyMFN3aW5nJUUzJTgxJUE3SlRhYmxlJUUzJTgxJUFFJUUzJTgyJUFCJUUzJTgzJUE5JUUzJTgzJUEwJUUzJTgyJTkyJUU1JTg5JThBJUU5JTk5JUE0JUUzJTgxJTk5JUUzJTgyJThCJnR4dC1jb2xvcj0lMjMyMTIxMjEmdHh0LWZvbnQ9SGlyYWdpbm8lMjBTYW5zJTIwVzYmdHh0LXNpemU9NTYmdHh0LWNsaXA9ZWxsaXBzaXMmdHh0LWFsaWduPWxlZnQlMkN0b3Amcz1hYjc4N2MxNzEzNzc0ZDlhYjFlODY5NzUwNzg2MDEzNw%26mark-x%3D142%26mark-y%3D112%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTYxNiZ0eHQ9JTQwa2VkYW1hMTcmdHh0LWNvbG9yPSUyMzIxMjEyMSZ0eHQtZm9udD1IaXJhZ2lubyUyMFNhbnMlMjBXNiZ0eHQtc2l6ZT0zNiZ0eHQtYWxpZ249bGVmdCUyQ3RvcCZzPTE5ZDUxZGM5NDUzOTEyNmEyNzdhMDEwMmUyNzc4MTQ2%26blend-x%3D142%26blend-y%3D491%26blend-mode%3Dnormal%26s%3D718f7ea77070b367c974917bbfc3f28c)