原文： http://zetcode.com/gui/jrubyswing/components/

在 JRuby Swing 编程教程的这一部分中，我们将介绍基本的 Swing 组件。

组件是 GUI 应用的基本构建块。 多年来，一些组件已成为所有 OS 平台上所有工具包中的标准组件。 例如，按钮，复选框或滚动条。 Swing 具有丰富的组件集，可满足大多数编程需求。 可以将更多专用组件创建为自定义组件。

JCheckBox

JCheckBox是具有两种状态的组件：开和关。 开状态通过复选标记显示。 它用来表示一些布尔属性。 JCheckBox组件提供了一个带有文本标签的复选框。

  1. #!/usr/local/bin/jruby
  3. # ZetCode JRuby Swing tutorial
  4. #
  5. # This program uses JCheckBox
  6. # component to show/hide the title
  7. # of the window
  8. #
  9. # author: Jan Bodnar
  10. # website: www.zetcode.com
  11. # last modified: December 2010
  13. include Java
  15. import java.awt.Dimension
  16. import javax.swing.JCheckBox
  17. import javax.swing.Box
  18. import javax.swing.BoxLayout
  19. import javax.swing.JFrame
  21. class Example < JFrame
  23.     def initialize
  24.         super "JCheckBox example"
  26.         self.initUI
  27.     end
  29.     def initUI
  31.         self.setLayout BoxLayout.new getContentPane, BoxLayout::Y_AXIS
  32.         self.add Box.createRigidArea Dimension.new 15, 20
  34.         cb = JCheckBox.new "Show Title", true
  35.         cb.setBounds 50, 60, 80, 30
  36.         cb.setFocusable(false)
  38.         cb.add_action_listener do |e|
  39.             if self.getTitle.empty?
  40.                 self.setTitle "JCheckBox example"
  41.             else
  42.                 self.setTitle ""
  43.             end
  44.         end
  46.         add cb
  48.         self.setDefaultCloseOperation JFrame::EXIT_ON_CLOSE
  49.         self.setSize 300, 200
  50.         self.setLocationRelativeTo nil
  51.         self.setVisible true
  52.     end
  53. end
  55. Example.new

在我们的示例中，我们在窗口上放置了一个复选框。 复选框显示或隐藏窗口的标题。

  1. self.setLayout BoxLayout.new getContentPane, BoxLayout::Y_AXIS
  2. self.add Box.createRigidArea Dimension.new 15, 20

在此示例中，我们使用BoxLayout布局管理器。 我们在此处放置一些空间，以使复选框不太靠近角落。

  1. cb = JCheckBox.new "Show Title", true

JCheckBox组件已创建。 构造器的第一个参数是其文本标签。 第二个参数是一个布尔值，指示初始选择状态。 如果为true，则选中该复选框。

  1. cb.setFocusable false

我们禁用复选框的焦点。 可以使用空格键选择或取消选择具有焦点的JCheckBox。

  1. cb.add_action_listener do |e|
  2.     if self.getTitle.empty?
  3.         self.setTitle "JCheckBox example"
  4.     else
  5.         self.setTitle ""
  6.     end
  7. end

在动作监听器内部，我们检查标题是否已设置。 如果有标题，我们将其删除。 如果没有标题，我们设置一个。 这样，我们可以切换标题的可见性。

JRuby Swing 中的组件 - 图1

图：JCheckBox

JLabel

JLabel组件用于显示文本，图像或两者。 没有用户交互。

  1. #!/usr/local/bin/jruby
  3. # ZetCode JRuby Swing tutorial
  4. #
  5. # In this program, we show lyrics of a
  6. # song in a window.
  7. #
  8. # author: Jan Bodnar
  9. # website: www.zetcode.com
  10. # last modified: December 2010
  12. include Java
  14. import java.awt.BorderLayout
  15. import java.awt.Color
  16. import java.awt.Font
  18. import javax.swing.JFrame
  19. import javax.swing.BorderFactory
  20. import javax.swing.JPanel
  21. import javax.swing.JLabel
  23. class Example < JFrame
  25.     def initialize
  26.         super "Lyrics"
  28.         self.initUI
  29.     end
  31.     def initUI
  33.         lyrics =  "<html>It's way too late to think of<br>
  34.         Someone I would call now<br>
  35.         And neon signs got tired<br>
  36.         Red eye flights help the stars out<br>
  37.         I'm safe in a corner<br>
  38.         Just hours before me<br>
  39.         <br>
  40.         I'm waking with the roaches<br>
  41.         The world has surrendered<br>
  42.         I'm dating ancient ghosts<br>
  43.         The ones I made friends with<br>
  44.         The comfort of fireflies<br>
  45.         Long gone before daylight<br>
  46.         <br>
  47.         And if I had one wishful field tonight<br>
  48.         I'd ask for the sun to never rise<br>
  49.         If God leant his voice for me to speak<br>
  50.         I'd say go to bed, world<br>
  51.         <br>
  52.         I've always been too late<br>
  53.         To see what's before me<br>
  54.         And I know nothing sweeter than<br>
  55.         Champaign from last New Years<br>
  56.         Sweet music in my ears<br>
  57.         And a night full of no fears<br>
  58.         <br>
  59.         But if I had one wishful field tonight<br>
  60.         I'd ask for the sun to never rise<br>
  61.         If God passed a mic to me to speak<br>
  62.         I'd say stay in bed, world<br>
  63.         Sleep in peace</html>"
  65.         panel = JPanel.new
  66.         panel.setLayout BorderLayout.new 10, 10
  68.         label = JLabel.new lyrics
  69.         label.setFont Font.new "Georgia", Font::PLAIN, 14
  70.         label.setForeground Color.new 50, 50, 25
  72.         panel.add label, BorderLayout::CENTER
  73.         panel.setBorder BorderFactory.createEmptyBorder 10, 10, 10, 10
  74.         self.add panel
  75.         self.pack
  77.         self.setDefaultCloseOperation JFrame::EXIT_ON_CLOSE
  78.         self.setLocationRelativeTo nil
  79.         self.setVisible true
  80.     end    
  81. end
  83. Example.new

我们的示例在窗口中显示了歌曲的歌词。 我们可以在JLabel组件中使用 HTML 标签。 我们使用<br>标签来分隔行。

  1. lyrics =  "<html>It's way too late to think of<br>
  2. Someone I would call now<br>
  3. And neon signs got tired<br>
  4. ...

我们定义了多行文字。

  1. label = JLabel.new lyrics
  2. label.setFont Font.new "Georgia", Font::PLAIN, 14

在这里，我们创建标签组件。 我们将其字体设置为 14 像素高的纯乔治亚州。

  1. panel.add label, BorderLayout::CENTER
  2. panel.setBorder BorderFactory.createEmptyBorder 10, 10, 10, 10

我们将标签放在面板的中央。 我们在标签周围放置了 10px。

JRuby Swing 中的组件 - 图2

图：JLabel组件

JSlider

JSlider是一个组件，使用户可以通过在有限的间隔内滑动旋钮来以图形方式选择一个值。 我们的示例将显示音量控制。

  1. #!/usr/local/bin/jruby
  3. # ZetCode JRuby Swing tutorial
  4. #
  5. # In this program we use a JSlider
  6. # component to control volume images.
  7. #
  8. # author: Jan Bodnar
  9. # website: www.zetcode.com
  10. # last modified: December 2010
  12. include Java
  14. import java.awt.Dimension
  15. import java.awt.BorderLayout
  17. import javax.swing.event.ChangeListener
  18. import javax.swing.JFrame
  19. import javax.swing.JSlider
  20. import javax.swing.JLabel
  21. import javax.swing.JPanel
  22. import javax.swing.BorderFactory
  23. import javax.swing.Box
  24. import javax.swing.BoxLayout
  25. import javax.swing.ImageIcon
  27. class ChangeEvent
  28.     include ChangeListener
  30.     def setLabel label
  31.         @label = label
  32.     end    
  34.     def setIcons mute, min, med, max
  35.         @mute = mute
  36.         @min = min
  37.         @med = med
  38.         @max = max
  39.     end       
  41.     def stateChanged e
  42.         sender = e.getSource
  44.         value = sender.getValue
  46.         if value == 0
  47.             @label.setIcon(@mute)
  48.         elsif value > 0 and value <= 30
  49.             @label.setIcon(@min)
  50.         elsif value > 30 and value < 80
  51.             @label.setIcon(@med)
  52.         else
  53.             @label.setIcon(@max)  
  54.         end            
  55.     end    
  56. end
  58. class Example < JFrame
  60.     def initialize
  61.         super "JSlider"
  63.         self.initUI
  64.     end
  66.     def initUI
  68.         mute = ImageIcon.new "mute.png"
  69.         min = ImageIcon.new "min.png"
  70.         med = ImageIcon.new "med.png"
  71.         max = ImageIcon.new "max.png"
  73.         panel = JPanel.new
  74.         panel.setLayout BoxLayout.new panel, BoxLayout::X_AXIS
  75.         panel.setBorder BorderFactory.createEmptyBorder 40, 40, 40, 40
  76.         self.setLayout BorderLayout.new
  78.         panel.add Box.createHorizontalGlue
  80.         label = JLabel.new mute, JLabel::CENTER
  82.         slider = JSlider.new 0, 150, 0
  84.         ce = ChangeEvent.new
  85.         ce.setLabel label
  86.         ce.setIcons mute, min, med, max
  87.         slider.add_change_listener ce
  89.         slider.setPreferredSize Dimension.new 150, 30
  91.         panel.add slider
  92.         panel.add label
  93.         panel.add Box.createRigidArea Dimension.new 5, 0
  95.         panel.add Box.createHorizontalGlue
  96.         self.add panel, BorderLayout::CENTER
  98.         self.pack
  100.         self.setDefaultCloseOperation JFrame::EXIT_ON_CLOSE
  101.         self.setSize 300, 200
  102.         self.setLocationRelativeTo nil
  103.         self.setVisible true
  104.     end
  105. end
  107. Example.new

在代码示例中，我们显示了JSlider和JLabel。 通过拖动滑块，我们可以更改标签组件上的图标。 我们有四个代表声音各种状态的图像。

  1. mute = ImageIcon.new "mute.png"

在这里，我们创建一个图像图标。

  1. panel.setLayout BoxLayout.new panel, BoxLayout::X_AXIS

面板组件具有水平BoxLayout。

  1. panel.setBorder BorderFactory.createEmptyBorder 40, 40, 40, 40

我们在面板周围创建 40px 的边框。

  1. panel.add Box.createHorizontalGlue

我们在左右两侧都放置了可调整大小的空间。 这是为了防止JSlider增长到不自然的大小。

  1. label = JLabel.new mute, JLabel::CENTER

该行创建一个具有指定图像和水平对齐方式的JLabel实例。 默认情况下，标签在其显示区域中垂直居中。

  1. slider = JSlider.new 0, 150, 0

这是一个JSlider构造器。 参数为最小值，最大值和当前值。

  1. ce = ChangeEvent.new
  2. ce.setLabel label
  3. ce.setIcons mute, min, med, max

创建一个ChangeEvent对象。 我们为此对象设置了标签和图标。

  1. slider.add_change_listener ce

每次我们移动滑块时，都会调用ChangeEvent对象的stateChanged方法。

  1. panel.add Box.createRigidArea Dimension.new 5, 0

我们在两个组件之间放置一个 5px 的刚性空间。 当滑块位于末端位置时，它们彼此之间过于靠近。

  1. class ChangeEvent
  2.     include ChangeListener

这是一个ChangeEvent类，它实现了ChangeListener。 因此，此类必须实现changeEvent方法。

  1. sender = e.getSource
  3. value = sender.getValue

在changeEvent方法内部，我们获取事件源。 它是产生事件的滑块。 从发送者，我们获得当前值。

  1. if value == 0
  2.     @label.setIcon(@mute)

如果该值等于零，我们将更新标签以具有mute.png图像。

JRuby Swing 中的组件 - 图3

图：JSlider

JToggleButton

JToggleButton是具有两种状态的按钮。 已按下但未按下。 通过单击可以在这两种状态之间切换。 在某些情况下此功能非常合适。

  1. #!/usr/local/bin/jruby
  3. # ZetCode JRuby Swing tutorial
  4. #
  5. # This program uses toggle buttons to
  6. # change the background color of
  7. # a panel.
  8. #
  9. # author: Jan Bodnar
  10. # website: www.zetcode.com
  11. # last modified: December 2010
  13. include Java
  15. import java.awt.Color
  16. import java.awt.Dimension
  17. import java.awt.event.ActionListener
  18. import javax.swing.JToggleButton
  19. import javax.swing.Box
  20. import javax.swing.BoxLayout
  21. import javax.swing.BorderFactory
  22. import javax.swing.JFrame
  23. import javax.swing.JPanel
  24. import javax.swing.border.LineBorder
  26. class Example < JFrame
  27.     include ActionListener
  29.     def initialize
  30.         super "JToggleButton"
  32.         self.initUI
  33.     end
  35.     def initUI
  37.         self.setPreferredSize Dimension.new 280, 200
  39.         bottom = JPanel.new
  40.         bottom.setLayout BoxLayout.new bottom, BoxLayout::X_AXIS
  41.         bottom.setBorder BorderFactory.createEmptyBorder 20, 20, 20, 20
  43.         leftPanel = JPanel.new
  44.         leftPanel.setLayout BoxLayout.new leftPanel, BoxLayout::Y_AXIS
  46.         @display = JPanel.new
  47.         @display.setPreferredSize Dimension.new 110, 110
  48.         @display.setBorder LineBorder.createGrayLineBorder
  49.         @display.setBackground Color.black
  51.         bottom.add @display
  53.         redButton = JToggleButton.new "red"
  54.         redButton.addActionListener self
  55.         greenButton = JToggleButton.new "green"
  56.         greenButton.addActionListener self
  57.         blueButton = JToggleButton.new "blue"
  58.         blueButton.addActionListener self
  60.         blueButton.setMaximumSize greenButton.getMaximumSize
  61.         redButton.setMaximumSize greenButton.getMaximumSize
  63.         leftPanel.add redButton
  64.         leftPanel.add Box.createRigidArea Dimension.new 25, 7
  65.         leftPanel.add greenButton
  66.         leftPanel.add Box.createRigidArea Dimension.new 25, 7
  67.         leftPanel.add blueButton      
  69.         bottom.add leftPanel
  70.         bottom.add Box.createRigidArea Dimension.new 20, 0
  72.         self.add bottom
  73.         self.pack
  75.         self.setDefaultCloseOperation JFrame::EXIT_ON_CLOSE
  76.         self.setSize 300, 200
  77.         self.setLocationRelativeTo nil
  78.         self.setVisible true
  79.     end
  81.     def actionPerformed e
  83.         color = @display.getBackground
  84.         red = color.getRed
  85.         green = color.getGreen
  86.         blue = color.getBlue
  88.         if e.getActionCommand == "red"
  89.             if red == 0
  90.                 red = 255
  91.             else
  92.                 red = 0
  93.             end
  94.         end
  96.         if e.getActionCommand == "green"
  97.             if green == 0
  98.                 green = 255
  99.             else
  100.                 green = 0
  101.             end
  102.         end
  104.         if e.getActionCommand == "blue"
  105.             if blue == 0
  106.                 blue = 255
  107.             else
  108.                 blue = 0
  109.             end            
  110.         end
  112.         setCol = Color.new red, green, blue
  113.         @display.setBackground setCol        
  114.     end      
  115. end
  117. Example.new

在代码示例中，我们使用三个切换按钮来更改矩形组件的颜色。

  1. class Example < JFrame
  2.     include ActionListener

该类实现ActionListener。 我们将在Example类的actionPerformed方法中执行一些操作。

  1. redButton = JToggleButton.new "red"
  2. redButton.addActionListener self

我们创建一个JToggleButton组件。 我们向按钮添加一个动作监听器。 动作监听器是Example类。 当我们单击redButton时，将调用Example类的actionPerformed方法。

  1. blueButton.setMaximumSize greenButton.getMaximumSize
  2. redButton.setMaximumSize greenButton.getMaximumSize

我们使三个按钮的大小相等。

  1. color = @display.getBackground
  2. red = color.getRed
  3. green = color.getGreen
  4. blue = color.getBlue

我们确定显示背景颜色的当前红色，绿色，蓝色部分。

  1. if e.getActionCommand == "red"
  2.     if red == 0
  3.         red = 255
  4.     else
  5.         red = 0
  6.     end
  7. end

我们确定切换了哪个按钮，并相应地更新 RGB 值的颜色部分。

  1. setCol = Color.new red, green, blue
  2. @display.setBackground setCol

在此创建新的颜色，并将显示面板更新为新的颜色。

JRuby Swing 中的组件 - 图4

图：JToggleButton

JList

JList是显示对象列表的组件。 它允许用户选择一项或多项。

  1. #!/usr/local/bin/jruby
  3. # ZetCode JRuby Swing tutorial
  4. #
  5. # In this program, we show all 
  6. # available fonts of a system in 
  7. # a JList component.
  8. #
  9. # author: Jan Bodnar
  10. # website: www.zetcode.com
  11. # last modified: December 2010
  13. include Java
  15. import java.awt.BorderLayout
  16. import java.awt.Dimension
  17. import java.awt.Font
  18. import java.awt.GraphicsEnvironment
  20. import javax.swing.JFrame
  21. import javax.swing.BorderFactory
  22. import javax.swing.JScrollPane
  23. import javax.swing.JPanel
  24. import javax.swing.JLabel
  25. import javax.swing.JList
  27. class Example < JFrame
  29.   def initialize
  30.     super "JList"
  32.     initUI
  33.   end
  35.   def initUI
  37.     panel = JPanel.new
  38.     panel.setLayout BorderLayout.new
  39.     panel.setBorder BorderFactory.createEmptyBorder 20, 20, 20, 20
  41.     ge = GraphicsEnvironment.getLocalGraphicsEnvironment
  42.     fonts = ge.getAvailableFontFamilyNames
  44.     list = JList.new fonts
  46.     list.add_list_selection_listener do |e|
  48.         sender = e.source
  50.         if not e.getValueIsAdjusting
  51.             name = sender.getSelectedValue
  52.             font = Font.new name, Font::PLAIN, 13
  53.             @label.setFont font
  54.         end
  55.     end
  57.     pane = JScrollPane.new
  58.     pane.getViewport.add list
  59.     pane.setPreferredSize Dimension.new 250, 200
  60.     panel.add pane
  62.     @label = JLabel.new "Aguirre, der Zorn Gottes"
  63.     @label.setFont Font.new "Serif", Font::PLAIN, 12
  64.     self.add @label, BorderLayout::SOUTH
  66.     self.add panel
  67.     self.pack
  69.     self.setDefaultCloseOperation JFrame::EXIT_ON_CLOSE
  70.     self.setLocationRelativeTo nil
  71.     self.setVisible true
  72.   end
  74. end
  76. Example.new

在我们的示例中，我们将显示JList和JLabel组件。 列表组件包含我们系统上所有可用字体系列名称的列表。 如果我们从列表中选择一项，则标签将以我们选择的字体显示。

  1. ge = GraphicsEnvironment.getLocalGraphicsEnvironment
  2. fonts = ge.getAvailableFontFamilyNames

在这里，我们获得系统上所有可能的字体系列名称。

  1. list = JList.new fonts

我们创建JList组件的实例。 它将显示所有字体系列名称。

  1. if not e.getValueIsAdjusting

列表选择中的事件被分组。 我们收到选择和取消选择事件。 为了仅过滤选择事件，我们使用getValueIsAdjusting方法。

  1. name = sender.getSelectedValue
  2. font = Font.new name, Font::PLAIN, 13
  3. @label.setFont font

我们得到所选项目并为标签设置新字体。

  1. pane = JScrollPane.new
  2. pane.getViewport.add list

默认情况下，JList组件不可滚动。 我们将列表放入JScrollPane以使其可滚动。

JRuby Swing 中的组件 - 图5

图：JList组件

在 JRuby Swing 教程的这一部分中，我们介绍了几个 Swing 组件。