swing_paradise 0.1.46

data/lib/swing_paradise/classes

@@ -0,0 +1 @@
+java_classes

data/lib/swing_paradise/examples/001_quit_button_example.rb

@@ -0,0 +1,55 @@
+include Java
+
+java_import javax.swing.JButton
+java_import javax.swing.JFrame
+java_import javax.swing.JLabel
+java_import javax.swing.JPanel
+java_import javax.swing.JTextArea
+java_import javax.swing.JScrollBar
+java_import javax.swing.JTextField
+java_import javax.swing.JSpinner
+java_import javax.swing.SpinnerNumberModel
+java_import java.lang.System
+java_import java.awt.Font
+
+module SwingParadise
+
+class QuitButtonExample < JFrame
+
+  require 'swing_paradise'
+  include SwingParadise
+ 
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    frame = frame('A quit button example')
+    panel = JPanel.new # This is an instance of Java::JavaxSwing::JPanel.
+    panel.set_font(Font.new 'Sans serif', Font::PLAIN, 85)
+    frame.getContentPane.add(panel)
+    panel.setLayout(nil)
+    panel.hint = 'A quit button example'
+    _ = quit_button
+    _.set_bounds(10, 20, 200, 40)
+    panel << _
+    frame.set_font(Font.new 'Sans serif', Font::PLAIN, 85)
+    frame.exit_on_close
+    frame.set_size(500, 400)
+    frame.setLocationRelativeTo(nil)
+    frame.show_all
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  SwingParadise::QuitButtonExample.new
+end

data/lib/swing_paradise/examples/002_text_area_example.rb

@@ -0,0 +1,55 @@
+include Java
+
+java_import javax.swing.JButton
+java_import javax.swing.JFrame
+java_import javax.swing.JLabel
+java_import javax.swing.JPanel
+java_import javax.swing.JTextArea
+java_import javax.swing.JScrollBar
+java_import javax.swing.JTextField
+java_import javax.swing.JSpinner
+java_import javax.swing.SpinnerNumberModel
+java_import java.lang.System
+java_import java.awt.Font
+
+module SwingParadise
+
+class TextAreaExample < JFrame
+
+  require 'swing_paradise'
+  include SwingParadise
+ 
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    frame = frame('A text area example')
+    panel = jpanel # This is an instance of Java::JavaxSwing::JPanel.
+    panel.set_font(Font.new('Calibri', Font::PLAIN, 30))
+    frame.getContentPane.add(panel)
+    panel.setLayout(nil)
+    panel.hint = 'A text area example'
+    _ = text_view
+    _.set_font(Font.new 'Sans serif', Font::PLAIN, 32)
+    _.set_bounds(10, 20, 500, 400) # Last two are width and height.
+    panel << _
+    frame.exit_on_close
+    frame.set_size(500, 400)
+    frame.setLocationRelativeTo(nil)
+    frame.show_all
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  SwingParadise::TextAreaExample.new
+end

data/lib/swing_paradise/examples/003_combo_box_example.rb

@@ -0,0 +1,57 @@
+include Java
+
+java_import javax.swing.JFrame
+
+module SwingParadise
+
+class ComboBoxExample < JFrame # === SwingParadise::ComboBoxExample
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    frame = frame('A combo-box example')
+    panel = jpanel # This is an instance of Java::JavaxSwing::JPanel.
+    panel.set_font(Font.new('Calibri', Font::PLAIN, 30))
+    frame.getContentPane.add(panel)
+    panel.setLayout(nil)
+    panel.hint = 'A text area example'
+    array = %w( apple bird cat dog eagle ferret )
+    combo_box = JComboBox.new
+    array.each {|this_item|
+      combo_box.addItem(this_item)
+    }
+    combo_box.setSelectedIndex(2)
+    combo_box.set_font(Font.new 'Sans serif', Font::PLAIN, 32)
+    combo_box.set_bounds(10, 20, 400, 80) # Last two are width and height.
+    combo_box.add_action_listener { |event|
+      case event.get_action_command
+      when /comboBoxChanged/
+        current_selection = combo_box.selected_item.to_s
+        e 'The selected item is: '+current_selection
+      end
+    }
+    panel << combo_box
+    frame.exit_on_close
+    frame.set_size(500, 400)
+    frame.setLocationRelativeTo(nil)
+    frame.show_all
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  SwingParadise::ComboBoxExample.new
+end

data/lib/swing_paradise/examples/004_jpanel_left_bound_example.rb

@@ -0,0 +1,41 @@
+require 'java'
+
+include Java
+
+java_import java.awt.BorderLayout
+java_import java.awt.FlowLayout
+java_import java.awt.Frame
+java_import javax.swing.JButton
+java_import javax.swing.JPanel
+java_import java.lang.System
+
+class JPanelLeftBoundExample < Frame
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+	 def initialize
+	  	super('JPanelLeftBoundExample Example')
+  		set_size(480, 180)
+  		panel = create_panel { :left }
+    panel.set_font(Font.new('Calibri', Font::PLAIN, 42))
+    panel.hint = 'A jpanel left-bound example'
+
+  		b1 = button('1')
+  		b1.on_clicked {
+  		  e 'I WAS CLICKED'
+    }
+  		b2 = button('2')
+  		b3 = button('3')
+  		panel.batch_add(b1, b2, b3)
+		  add(panel, BorderLayout::NORTH)
+ 	end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  JPanelLeftBoundExample.new.visible = true
+end

data/lib/swing_paradise/examples/005_box_layout_example.rb

@@ -0,0 +1,39 @@
+require 'java'
+
+java_import java.awt.Frame
+
+class BoxLayoutExample < Frame
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+    
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+	def initialize
+		super('BoxLayoutExample Example')
+		set_size(480, 180)
+		panel = new_boxlayout(:new_panel)
+    # panel.set_font(Font.new('Calibri', Font::PLAIN, 42))
+    panel.setBorder(BorderFactory.createEmptyBorder(10, 10, 10, 10))
+
+    # The top label
+    _ = text('Login')
+    _.center
+    entry1 = text_field(10)
+    entry1.setAlignmentX(Component::CENTER_ALIGNMENT)
+    entry2 = password_field(10)
+    entry2.setAlignmentX(Component::CENTER_ALIGNMENT)
+    # The login button
+    login_button = button('login')
+    login_button.setAlignmentX(Component::CENTER_ALIGNMENT)
+
+    panel.batch_add(_, entry1, entry2, login_button)
+		add(panel, BorderLayout::NORTH)
+	end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  BoxLayoutExample.new.is_visible
+end

data/lib/swing_paradise/examples/006_frame_example.rb

@@ -0,0 +1,33 @@
+require 'java'
+
+java_import java.awt.Frame
+
+class FrameExample < Frame
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+	def initialize
+		super('FrameExample Example')
+		set_size(480, 180)
+		panel = JPanel.new(GridLayout.new(7, 1, 5, 5))
+    panel.set_font(Font.new('Calibri', Font::PLAIN, 62))
+    panel.setBorder(
+      BorderFactory.uniform_border(20)
+    ) 
+    _ = BorderFactory.createTitledBorder(" Frame")
+    panel.setBorder(_)
+    _ = bold_text('Examples')
+    _.set_font(Font.new('Calibri', Font::PLAIN, 40))
+    panel.add(_, JLabel::CENTER)
+		add(panel, BorderLayout::NORTH)
+	end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  FrameExample.new.is_visible
+end

data/lib/swing_paradise/examples/007_textarea_responding_to_enter_key_example.rb

@@ -0,0 +1,28 @@
+java_import java.awt.event.ActionEvent
+java_import java.awt.event.ActionListener
+java_import java.awt.event.WindowAdapter
+java_import java.awt.event.WindowEvent
+
+java_import javax.swing.JFrame
+java_import javax.swing.JTextField
+
+class TextareaRespondingToEnterKeyExample < JFrame
+
+  alias e puts
+
+  # === initialize
+  def initialize
+    super('This example shows how to respond to an enter-event.')
+    setSize(1000, 400)
+    text = JTextField.new('Press the <Return> key here', 50)
+    text.addActionListener {|event|
+      e 'The enter key was pressed.'
+      # _ = event.get_action_command
+    }
+    setDefaultCloseOperation(JFrame::EXIT_ON_CLOSE)
+    add(text, 'Center')
+  end
+
+end
+
+TextareaRespondingToEnterKeyExample.new.setVisible(true)

data/lib/swing_paradise/examples/008_scrolled_window_example.rb

@@ -0,0 +1,41 @@
+java_import java.awt.FlowLayout
+java_import java.awt.event.ActionEvent
+java_import java.awt.event.ActionListener
+java_import java.awt.event.WindowAdapter
+java_import java.awt.event.WindowEvent
+
+java_import javax.swing.JFrame
+java_import javax.swing.JTextField
+java_import javax.swing.JScrollPane
+java_import javax.swing.JTextArea
+
+class ScrolledWindowExample < JFrame
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  require 'swing_paradise/java_classes/jscrollpane/jscrollpane.rb'
+
+  alias e puts
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    super('Scrolled Window Example')
+    setSize(1200, 800)
+    getContentPane.setLayout(FlowLayout.new)
+    textarea = jtextarea(35, 30)
+    textarea.set_text("Test\n"*120)
+    scrolled_window = JScrollPane.new(textarea)
+    scrolled_window.horizontal_always
+    scrolled_window.vertical_always
+    scrolled_window.is_visible
+    add(scrolled_window)
+    is_visible
+    default_close
+  end
+
+end
+
+ScrolledWindowExample.new

data/lib/swing_paradise/examples/009_font_size_example.rb

@@ -0,0 +1,39 @@
+include Java
+
+java_import javax.swing.JButton
+java_import javax.swing.JFrame
+java_import javax.swing.JLabel
+java_import javax.swing.JPanel
+java_import javax.swing.JTextArea
+java_import javax.swing.JScrollBar
+java_import javax.swing.JTextField
+java_import javax.swing.JSpinner
+java_import javax.swing.SpinnerNumberModel
+java_import java.lang.System
+java_import java.awt.Font
+
+class FontSizeExample
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    frame = JFrame.new("Label Example")
+    label = JLabel.new('First Label')
+    label.setBounds(50, 50, 350, 150)
+    label.setFont(Font.new('Verdana', Font::PLAIN, 80))
+    # button1 = JButton.new('A test button')
+    # button1.setBounds(150, 450, 350, 150)
+    # button1.setFont(Font.new('Verdana', Font::PLAIN, 40))
+    frame.add(label)
+    # frame.add(button1)
+    frame.setSize(840, 540)
+    # frame.setLayout(nil)
+    frame.setVisible(true)
+  end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  FontSizeExample.new  
+end

data/lib/swing_paradise/examples/010_counter_example.rb

@@ -0,0 +1,183 @@
+require 'java'
+
+java_import java.awt.Frame
+
+class CounterModel # === CounterModel
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize
+    @value = 0
+  end
+
+  # ========================================================================= #
+  # === value?
+  # ========================================================================= #
+  def value?
+    @value
+  end; alias getValue value? # === getValue
+
+  # ========================================================================= #
+  # === increment
+  # ========================================================================= #
+  def increment(by_n = 1)
+    @value += by_n
+  end
+
+  # ========================================================================= #
+  # === decrement
+  # ========================================================================= #
+  def decrement(by_n = 1)
+    @value -= by_n
+  end
+
+  # ========================================================================= #
+  # === reset_the_value
+  # ========================================================================= #
+  def reset_the_value
+    @value = 0
+  end
+
+end
+
+class SimpleFrame < JFrame
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  def initialize
+    setSize(200,200)
+    setLocation(200,200)
+    setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE)
+  end
+
+  # Makes the frame visible.
+  def showIt(title)
+    if title
+      setTitle(title)
+    end
+    setVisible(true)
+  end
+
+  # Makes the frame visible and sets the title text
+  # and the position of the window.
+  def showIt(title, x, y)
+    setTitle(title)
+    setLocation(x,y)
+    setVisible(true)
+  end
+
+  # ========================================================================= #
+  # Makes the frame invisible.
+  # ========================================================================= #
+  def hideIt
+    setVisible(false)
+  end
+
+end
+
+# =========================================================================== #
+# === CounterFrame
+# =========================================================================== #
+class CounterFrame < SimpleFrame
+
+  # ========================================================================= #
+  # === initialize 
+  # ========================================================================= #
+  def initialize
+    counterPanel = CounterPanel.new
+    getContentPane.add(counterPanel, BorderLayout::CENTER)
+  end
+
+end
+
+# =========================================================================== #
+# === CounterDriver
+# =========================================================================== #
+class CounterDriver
+  def initialize
+    cfr = new CounterFrame()
+    cfr.showIt("Counter")
+  end
+end
+
+class CounterListener
+  def initialize(i = ARGV)
+    @countPane = i
+  end
+  # === actionPerformed
+  def actionPerformed(event)
+    puts 'HUH'
+    pp event.class
+    actionCommand = event.getActionCommand
+    if actionCommand == "Up"
+      @countPane.increment
+    elsif actionCommand == "Down"
+      @countPane.decrement
+    else
+      puts "ERROR: Unexpected ActionCommand"
+    end
+  end
+
+end
+
+class CounterPanel < JPanel
+
+  def initialize
+    @counter = CounterModel.new
+    bordLay = BorderLayout.new
+    setLayout(bordLay)
+    upButton = JButton.new("Up")
+    downButton = JButton.new("Down")
+    @valueLabel = JLabel.new(""+counter.getValue(),SwingConstants::CENTER)
+    add(upButton,BorderLayout::WEST)
+    add(downButton,BorderLayout::EAST)
+    add(@valueLabel,BorderLayout::CENTER)
+    # The next three lines will later be used to incorporate
+    # the listener.
+    # CounterListener countList = new CounterListener(this);
+    # upButton.addActionListener(countList);
+    # downButton.addActionListener(countList);
+  end
+
+  def increment
+    @counter.increment
+    @valueLabel.setText(""+counter.getValue)
+  end
+
+  def decrement
+    @counter.decrement
+    @valueLabel.setText(""+counter.getValue())
+  end
+
+end
+
+class CounterExample < Frame # === CounterExample
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+	def initialize
+		super('CounterExample Example')
+		set_size(480, 180)
+		panel = create_panel(GridLayout.new(7, 1, 5, 5))
+    panel.set_font(Font.new('Calibri', Font::PLAIN, 62))
+    panel.uniform_border(20) 
+    _ = BorderFactory.createTitledBorder(" Frame")
+    panel.setBorder(_)
+    _ = bold_text('Examples')
+    _.set_font(Font.new('Calibri', Font::PLAIN, 40))
+    panel.add(_, JLabel::CENTER)
+		add(panel, BorderLayout::NORTH)
+		is_visible
+	end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  CounterExample.new
+end

data/lib/swing_paradise/examples/011_button_with_image_example.rb

@@ -0,0 +1,58 @@
+# =========================================================================== #
+# This example works without using SwingParadise. You can modify
+# the path of the image below.
+# =========================================================================== #
+include Java
+
+java_import javax.swing.JFrame
+
+class ButtonWithImageExample < JFrame
+
+  require 'swing_paradise/base_module/base_module.rb'
+  include SwingParadise::BaseModule
+
+  # ========================================================================= #
+  # === PATH_TO_THE_IMAGE_FILE
+  #
+  # This may have to be changed to another image.
+  # ========================================================================= #
+  PATH_TO_THE_IMAGE_FILE = '/home/x/data/images/NJOY/Susanne_01.jpg'
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    super('Icon Frame')
+    reset
+    setDefaultCloseOperation(JFrame::EXIT_ON_CLOSE)
+    panel = create_panel
+    # ======================================================================= #
+    # Next create the image:
+    # ======================================================================= #
+    button = button_with_image(PATH_TO_THE_IMAGE_FILE, "An example of showing an image")
+    panel.add(button)
+    add(panel)
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === reset                                                     (reset tag)
+  # ========================================================================= #
+  def reset
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    pack()
+    setVisible(true)
+  end
+
+end
+
+if __FILE__ == $PROGRAM_NAME
+  ButtonWithImageExample.new  
+end

data/lib/swing_paradise/examples/012_quit_on_escape_key_being_pressed.rb

@@ -0,0 +1,37 @@
+# =========================================================================== #
+# 012_quit_on_escape_key_being_pressed.rb
+# =========================================================================== #
+module SwingParadise
+
+require 'swing_paradise/base_module/base_module.rb'
+
+class QuitOnEscapeKeyBeingPressed < JFrame # === SwingParadise::QuitOnEscapeKeyBeingPressed
+
+  include SwingParadise::BaseModule
+
+  # ========================================================================= #
+  # === initialize
+  # ========================================================================= #
+  def initialize(
+      run_already = true
+    )
+    run if run_already
+  end
+
+  # ========================================================================= #
+  # === run
+  # ========================================================================= #
+  def run
+    frame = frame('Showcasing how to quit on escape-key being pressed')
+    frame.allow_the_escape_key_to_exit
+    frame.exit_on_close
+    frame.set_size(500, 400)
+    frame.setLocationRelativeTo(nil)
+    frame.show_all
+  end
+
+end; end
+
+if __FILE__ == $PROGRAM_NAME
+  SwingParadise::QuitOnEscapeKeyBeingPressed.new
+end