JRuby のバックアップの現在との差分(No.5)

JRuby で Swing などのサンプル

概要

Swing + JRuby サンプル

EDT で起動(JFrameを表示)

#spanend
#spandel
include Java
#spanend
#spanadd
#gist(6579373)
#spanend

#spandel
java_import javax.swing.JLabel
#spanend
#spandel
java_import javax.swing.UIManager
#spanend
#spandel
java_import javax.swing.WindowConstants
#spanend
#spandel
def create_and_show_GUI
#spanend
  begin
    UIManager.look_and_feel = UIManager.system_look_and_feel_class_name
  rescue Exception => e
    proxied_e = JavaUtilities.wrap e.cause
    proxied_e.print_stack_trace
  end
  frame = javax.swing.JFrame.new "Title"
  frame.default_close_operation = WindowConstants::EXIT_ON_CLOSE
  frame.content_pane.add JLabel.new "Test"
  frame.set_size(320, 240)
  frame.location_relative_to = nil
  frame.visible = true
#spandel
end
#spanend
#spandel
def run
#spanend
  create_and_show_GUI
#spandel
end
#spanend
#spandel
java.awt.EventQueue.invokeLater self
#spanend
#spandel

クラスの継承(JPanelを継承)

#spanend
#spandel
include Java
#spanend
#spandel
java_import java.awt.Dimension
#spanend
#spandel
java_import javax.swing.JPanel
#spanend
#spandel
java_import javax.swing.JTextField
#spanend
#spanadd
** クラスの継承(JPanelを継承) [#extend]
#spanend
- `class MainPanel < JPanel`

#spandel
class MainPanel < JPanel
#spanend
  def initialize
    super
    field = JTextField.new 32
    self.add field
    self.preferred_size = Dimension.new(320, 240)
  end
#spandel
end
#spanend
#spanadd
#gist(6579429)
#spanend

#spandel
java_import javax.swing.UIManager
#spanend
#spandel
java_import javax.swing.WindowConstants
#spanend
#spandel
def create_and_show_GUI
#spanend
  begin
    UIManager.look_and_feel = UIManager.system_look_and_feel_class_name
  rescue Exception => e
    proxied_e = JavaUtilities.wrap e.cause
    proxied_e.print_stack_trace
  end
  frame = javax.swing.JFrame.new "Title"
  frame.default_close_operation = WindowConstants::EXIT_ON_CLOSE
  frame.content_pane.add MainPanel.new
  frame.pack
  frame.location_relative_to = nil
  frame.visible = true
#spandel
end
#spanend
#spandel
def run
#spanend
  create_and_show_GUI
#spandel
end
#spanend
#spandel
java.awt.EventQueue.invokeLater self
#spanend
#spandel

無名インナークラス(JButtonにActionListenerを追加)

#spanend
#spandel
include Java
#spanend
#spanadd
#gist(6579457)
#spanend

#spandel
java_import java.awt.Dimension
#spanend
#spandel
java_import javax.swing.JPanel
#spanend
#spandel
java_import javax.swing.JButton
#spanend
#spandel
java_import javax.swing.JTextField
#spanend
#spanadd
** インタフェースの実装(MouseListenerを追加) [#Interface]
#spanend
- `java_implements`はもう使用できない？
-- 代わりに: `class MainPanel < JPanel; include MouseListener`
-- カンマ区切りで複数指定しても可: `class MainPanel < JPanel; include MouseListener, ActionListener`
- `instanceof`
-- `self.java_kind_of?(MouseListener)`

#spandel
class MainPanel < JPanel
#spanend
  def initialize
    super
    field = JTextField.new 32
    button = JButton.new "add a"
    button.add_action_listener { |e|
      puts e
      field.text = field.text + "a"
    }
    self.add field
    self.add button
    self.preferred_size = Dimension.new(320, 240)
  end
#spandel
end
#spanend
#spanadd
#gist(6579526)
#spanend

#spandel
java_import javax.swing.UIManager
#spanend
#spandel
java_import javax.swing.WindowConstants
#spanend
#spandel
def create_and_show_GUI
#spanend
  begin
    UIManager.look_and_feel = UIManager.system_look_and_feel_class_name
  rescue Exception => e
    proxied_e = JavaUtilities.wrap e.cause
    proxied_e.print_stack_trace
  end
  frame = javax.swing.JFrame.new "JRuby Swing JButton ActionListener"
  frame.default_close_operation = WindowConstants::EXIT_ON_CLOSE
  frame.content_pane.add MainPanel.new
  frame.pack
  frame.location_relative_to = nil
  frame.visible = true
#spandel
end
#spanend
#spandel
def run
#spanend
  create_and_show_GUI
#spandel
end
#spanend
#spandel
java.awt.EventQueue.invokeLater self
#spanend
#spandel

インタフェースの実装(MouseListenerを追加)

#spanend
# -*- encoding: utf-8 -*-
#spandel
include Java
#spanend
 SuperPaint = JComponent.java_class.declared_method 'paintComponent', 'java.awt.Graphics'

#spandel
java_import java.awt.event.MouseListener
#spanend
#spandel
java_import java.awt.Dimension
#spanend
#spandel
java_import javax.swing.JPanel
#spanend
#spandel
java_import javax.swing.JButton
#spanend
#spandel
java_import javax.swing.JTextField
#spanend
#spanadd
などとして、関数ポインタ？を作成して実行する。
#spanend

#spandel
class MainPanel < JPanel
#spanend
                include MouseListener
  def initialize
    super
    field = JTextField.new 32
    button = JButton.new "add a"
    button.add_action_listener {
      field.text = field.text + "a"
    }
#spanadd
#gist(6579618)
#spanend

#     # https://blogs.oracle.com/nishigaya/entry/tips_for_accessing_java_objects2
#     button.add_mouse_listener do |ev|
#       p ev
#     end
#spanadd
** 配列(JTableに行追加) [#Array]
#spanend
- `["No.", "Name", "Path"].to_java`で`ruby`の配列を`java`の配列に変換して、`JTable`の行を追加

#     #:1 warning: singleton on non-persistent Java type #<Class:0x103bdaa8> (http://wiki.jruby.org/Persistence)
#     class << listener = java.awt.event.MouseListener.new
#       def mouseEntered(e)
#         puts "mouseEntered"
#       end
#       def mouseExited(e)
#         puts "mouseExited"
#       end
#       def mousePressed(e)
#         puts "mousePressed"
#       end
#       def mouseClicked(e)
#         puts "mouseClicked"
#       end
#       def mouseReleased(e)
#         puts "mouseReleased"
#       end
#     end
#     button.add_mouse_listener listener
#spanadd
#gist(6579639)
#spanend

    # puts self.java_kind_of?(MouseListener)
    button.add_mouse_listener self
#spanadd
** protected なメソッドをオーバーライドして使用 [#protected]
#spanend
- `protected`なメソッドをオーバーライドして使用できなかった
-- `JRuby 1.2.0`で修正？
--- [http://jira.codehaus.org/browse/JRUBY-2861 JRUBY-2861 Cannot call super inside a method that overrides a protected method on Java base class]
- `SwingWorker#process`がオーバーライドして使用(`firePropertyChange`を使用しなくて済む)
#spanadd
//-- https://ateraimemo.com/data/jruby/swing-worker3.rb
#spanend
- `JDK 1.6.0_18`で、`TableRowSorter`でのソートが不正な件は、`JDK 1.6.0_2x`で修正済
-- `Exception in thread "AWT-EventQueue-0" java.lang.ClassCastException: java.lang.Byte cannot be cast to java.lang.Long`

    self.add field
    self.add button
    self.preferred_size = Dimension.new(320, 240)
  end
#spanadd
#gist(6590330)
#spanend

  # MouseListener
  def mouseEntered(e)
    puts "mouseEntered"
  end
  def mouseExited(e)
    puts "mouseExited"
  end
  def mousePressed(e)
    puts "mousePressed"
  end
  def mouseClicked(e)
    puts "mouseClicked"
  end
  def mouseReleased(e)
    puts "mouseReleased"
  end
#spandel
end
#spanend
#spandel

#spanend
#spandel
java_import javax.swing.UIManager
#spanend
#spandel
java_import javax.swing.WindowConstants
#spanend
#spandel
def create_and_show_GUI
#spanend
  begin
    UIManager.look_and_feel = UIManager.system_look_and_feel_class_name
  rescue Exception => e
    proxied_e = JavaUtilities.wrap e.cause
    proxied_e.print_stack_trace
  end
  frame = javax.swing.JFrame.new "JRuby Swing JButton ActionListener"
  frame.default_close_operation = WindowConstants::EXIT_ON_CLOSE
  frame.content_pane.add MainPanel.new
  frame.pack
  frame.location_relative_to = nil
  frame.visible = true
#spandel
end
#spanend
#spandel
def run
#spanend
  create_and_show_GUI
#spandel
end
#spanend
#spandel
java.awt.EventQueue.invokeLater self
#spanend
#spandel

配列(JTableに行追加)

#spanend
# -*- encoding: utf-8 -*-
#spandel
include Java
#spanend
#spandel
java_import javax.swing.UIManager
#spanend
#spandel
java_import javax.swing.WindowConstants
#spanend
#spandel
java_import javax.swing.table.DefaultTableModel
#spanend
#spandel
def make_ui
#spanend
  m = DefaultTableModel.new(nil, ["No.", "Name", "Path"].to_java)
  m.add_row java.util.Vector.new(["テスト", "あああ", "いいいい"])
  m.add_row ["aaa", "bbb", "ccc"].to_java
  t = javax.swing.JTable.new m
  p = javax.swing.JPanel.new java.awt.BorderLayout.new
  p.add javax.swing.JScrollPane.new(t)
  return p
#spandel
end
#spanend
#spandel
def run #Override
#spanend
  begin
    UIManager.look_and_feel = UIManager.system_look_and_feel_class_name
  rescue Exception => e
    proxied_e = JavaUtilities.wrap e.cause
    proxied_e.print_stack_trace
  end
  f = javax.swing.JFrame.new "jruby swing"
  f.default_close_operation = WindowConstants::EXIT_ON_CLOSE
  f.content_pane.add make_ui
  f.set_size(320, 240)
  f.location_relative_to = nil
  f.visible = true
#spandel
end
#spanend
#spandel
java.awt.EventQueue.invoke_later self
#spanend
#spandel

ソースコードの文字コード(エンコーディング)

その他、JRuby + One-Liner などのサンプル

JRuby One-Liner で、UIManagerのDefaults.keySetを一覧表示する

One-Liner での文字コード

JRuby 1.7.0.preview1 でArgumentErrorが発生する場合

JRuby で PukiWiki のファイル名をデコード

PukiWiki形式のテキストをMarkdown形式のファイルに変換する

リンク

コメント