fxruby 1.6.27-x64-mingw32

data/test/TC_FXFontDesc.rb

@@ -0,0 +1,58 @@
+require 'test/unit'
+
+require 'fox16'
+
+class TC_FXFontDesc < Test::Unit::TestCase
+  include Fox
+
+  def setup
+    @fontdesc = FXFontDesc.new
+  end
+
+  def test_face
+    @fontdesc.face = "Times New Roman"
+    assert_equal("Times New Roman", @fontdesc.face)
+  end
+
+  def test_size
+    @fontdesc.size = 120
+    assert_equal(120, @fontdesc.size)
+  end
+
+  def test_weight
+    weights = [FXFont::Thin,
+               FXFont::ExtraLight,
+               FXFont::Light,
+               FXFont::Normal,
+               FXFont::Medium,
+               FXFont::DemiBold,
+               FXFont::Bold,
+               FXFont::ExtraBold,
+               FXFont::Black]
+    weights.each do |weight|
+      @fontdesc.weight = weight
+      assert_equal(weight, @fontdesc.weight)
+    end
+  end
+
+  def test_slant
+    slants = [FXFont::ReverseOblique,
+              FXFont::ReverseItalic,
+	      FXFont::Straight,
+	      FXFont::Italic,
+	      FXFont::Oblique]
+    slants.each do |slant|
+      @fontdesc.slant = slant
+      assert_equal(slant, @fontdesc.slant)
+    end
+  end
+
+  def test_encoding
+  end
+
+  def test_setwidth
+  end
+
+  def test_flags
+  end
+end

data/test/TC_FXGLGroup.rb

@@ -0,0 +1,32 @@
+require 'test/unit'
+require 'fox16'
+
+class TC_FXGLGroup < Test::Unit::TestCase
+  include Fox
+
+  def setup
+    @group = FXGLGroup.new
+  end
+
+  def test_append
+    assert_equal(0, @group.size)
+    @group.append(FXGLObject.new)
+    assert_equal(1, @group.size)
+  end
+
+  def test_appendOp
+    assert_equal(0, @group.size)
+    @group << FXGLObject.new
+    assert_equal(1, @group.size)
+  end
+
+  def test_each_child_yields_to_block
+    @group << FXGLObject.new
+    @group << FXGLObject.new
+    count = 0
+    assert_nothing_raised {
+      @group.each_child { |c| count += 1 }
+    }
+    assert_equal(2, count)
+  end
+end

data/test/TC_FXGLShape.rb

@@ -0,0 +1,28 @@
+require 'test/unit'
+require 'fox16'
+
+class TC_FXGLShape < Test::Unit::TestCase
+  include Fox
+
+
+  DELTA = 1.0e-5
+
+  def setup
+    @shape = FXGLShape.new(0.0, 0.0, 0.0, 0)
+  end
+  def test_getPosition
+    assert_kind_of(FXVec3f, @shape.position)
+  end
+  def test_setPosition
+    @shape.position = FXVec3f.new(0.1, 0.2, 0.3)
+    assert_in_delta(0.1, @shape.position[0], DELTA)
+    assert_in_delta(0.2, @shape.position[1], DELTA)
+    assert_in_delta(0.3, @shape.position[2], DELTA)
+
+    @shape.position = [0.4, 0.5, 0.6]
+    assert_in_delta(0.4, @shape.position[0], DELTA)
+    assert_in_delta(0.5, @shape.position[1], DELTA)
+    assert_in_delta(0.6, @shape.position[2], DELTA)
+  end
+end
+

data/test/TC_FXGLViewer.rb

@@ -0,0 +1,29 @@
+require 'test/unit'
+require 'fox16'
+require 'testcase'
+
+class TC_FXGLViewer < Fox::TestCase
+  include Fox
+
+  def setup
+    super(self.class.name)
+    vis = FXGLVisual.new(app, VISUAL_DOUBLEBUFFER)
+    @viewer = FXGLViewer.new(mainWindow, vis)
+  end
+
+  def test_supported
+    assert FXGLVisual.supported?(app)
+  end
+
+  def test_nil_app_raises_argument_error
+    assert_raise(ArgumentError){ FXGLVisual.supported?(nil) }
+  end
+
+=begin
+  def test_readPixels
+    pixels = @viewer.readPixels(0, 0, @viewer.width, @viewer.height)
+    assert(pixels)
+    assert_equal(3*@viewer.width*@viewer.height, pixels.size)
+  end
+=end
+end

data/test/TC_FXGradientBar.rb

@@ -0,0 +1,89 @@
+require 'test/unit'
+require 'fox16'
+require 'testcase'
+
+class TC_FXGradientBar < Fox::TestCase
+  include Fox
+
+  def setup
+    super(self.class.name)
+    @gradientBar = FXGradientBar.new(mainWindow)
+  end
+  def test_getSegment
+  end
+  def test_getGrip
+  end
+  def test_getNumSegments
+  end
+  def test_setGradients
+  end
+  def test_getGradients
+  end
+  def test_setCurrentSegment
+  end
+  def test_getCurrentSegment
+  end
+  def test_setAnchorSegment
+  end
+  def test_getAnchorSegment
+  end
+  def test_selectSegments
+  end
+  def test_deselectSegments
+  end
+  def test_isSegmentSelected
+  end
+  def test_setSegmentLowerColor
+  end
+  def test_setSegmentUpperColor
+  end
+  def test_getSegmentLowerColor
+  end
+  def test_getSegmentUpperColor
+  end
+  def test_moveSegmentLower
+  end
+  def test_moveSegmentMiddle
+  end
+  def test_moveSegmentUpper
+  end
+  def test_moveSegments
+  end
+  def test_getSegmentLower
+  end
+  def test_getSegmentMiddle
+  end
+  def test_getSegmentUpper
+  end
+  def test_gradient
+    emptyRamp = @gradientBar.gradient(0)
+    assert_kind_of(Array, emptyRamp)
+    assert(emptyRamp.empty?)
+  end
+  def test_getSegmentBlend
+  end
+  def test_splitSegments
+  end
+  def test_mergeSegments
+  end
+  def test_uniformSegments
+  end
+  def test_blendSegments
+  end
+  def test_barStyle
+    @gradientBar.barStyle = 0
+    assert_equal(0, @gradientBar.barStyle)
+  end
+  def test_selectColor
+    @gradientBar.selectColor = FXRGB(255, 0, 255)
+    assert_equal(FXRGB(255, 0, 255), @gradientBar.selectColor)
+  end
+  def test_helpText
+    @gradientBar.helpText = "helpText"
+    assert_equal("helpText", @gradientBar.helpText)
+  end
+  def test_tipText
+    @gradientBar.tipText = "tipText"
+    assert_equal("tipText", @gradientBar.tipText)
+  end
+end

data/test/TC_FXHeader.rb

@@ -0,0 +1,82 @@
+require 'fox16'
+require 'test/unit'
+require 'testcase'
+
+class TC_FXHeader < Fox::TestCase
+  include Fox
+
+
+  def setup
+    super(self.class.name)
+    @header = FXHeader.new(mainWindow, nil, 0, HEADER_NORMAL)
+  end
+
+  def test_setArrowDir
+    @header.appendItem("")
+    @header.setArrowDir(0, true)
+    @header.setArrowDir(0, false)
+    @header.setArrowDir(0, Fox::TRUE)
+    @header.setArrowDir(0, Fox::FALSE)
+    @header.setArrowDir(0, Fox::MAYBE)
+  end
+
+  def test_getArrowDir
+    @header.appendItem("")
+    assert_instance_of(Fixnum, @header.getArrowDir(0))
+  end
+
+  def test_arrowUp?
+    @header.appendItem("")
+    assert_same(false, @header.arrowUp?(0))
+    @header.setArrowDir(0, Fox::TRUE)
+    assert_same(true, @header.arrowUp?(0))
+  end
+
+  def test_arrowDown?
+    @header.appendItem("")
+    assert_same(false, @header.arrowDown?(0))
+    @header.setArrowDir(0, Fox::FALSE)
+    assert_same(true, @header.arrowDown?(0))
+  end
+
+  def test_arrowMaybe?
+    @header.appendItem("")
+    assert_same(true, @header.arrowMaybe?(0))
+    @header.setArrowDir(0, Fox::MAYBE)
+    assert_same(true, @header.arrowMaybe?(0))
+  end
+
+  def test_SEL_REPLACED
+    @header.appendItem("One")
+    @header.appendItem("Two")
+    itemIndex = 0
+    @header.connect(SEL_REPLACED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @header.setItem(1, "", nil, 0, nil, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_SEL_INSERTED
+    @header.appendItem("One")
+    @header.appendItem("Two")
+    itemIndex = 0
+    @header.connect(SEL_INSERTED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @header.insertItem(1, "One Point Five", nil, 0, nil, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_SEL_DELETED
+    @header.appendItem("One")
+    @header.appendItem("Two")
+    itemIndex = 0
+    @header.connect(SEL_DELETED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @header.removeItem(1, true)
+    assert_equal(1, itemIndex)
+  end
+end
+

data/test/TC_FXHiliteStyle.rb

@@ -0,0 +1,23 @@
+require 'fox16'
+require 'test/unit'
+
+class TC_FXHiliteStyle < Test::Unit::TestCase
+  include Fox
+
+
+  def setup
+    @style = FXHiliteStyle.new
+  end
+
+  def test_new_object_is_initialized
+    assert_equal(0, @style.normalForeColor)
+    assert_equal(0, @style.normalBackColor)
+    assert_equal(0, @style.selectForeColor)
+    assert_equal(0, @style.selectBackColor)
+    assert_equal(0, @style.hiliteForeColor)
+    assert_equal(0, @style.hiliteBackColor)
+    assert_equal(0, @style.activeBackColor)
+    assert_equal(0, @style.style)
+  end
+end
+

data/test/TC_FXIconDict.rb

@@ -0,0 +1,52 @@
+require 'test/unit'
+require 'fox16'
+require 'testcase'
+
+class TC_FXIconDict < Fox::TestCase
+  include Fox
+
+  def setup
+    super(self.class.name)
+  end
+
+  def test_defaultIconPath_s
+    assert_equal("~/.foxicons:/usr/local/share/icons:/usr/share/icons", FXIconDict.defaultIconPath)
+  end
+
+  def test_empty
+    iconDict = FXIconDict.new(app)
+    assert(iconDict.empty?)
+  end
+
+  def test_defaultIconPath
+    iconDict = FXIconDict.new(app)
+    assert_equal(FXIconDict.defaultIconPath, iconDict.iconPath)
+  end
+
+  def test_iconPath
+    iconDict = FXIconDict.new(app, "foo")
+    assert_equal("foo", iconDict.iconPath)
+    iconDict.iconPath = "bar"
+    assert_equal("bar", iconDict.iconPath)
+  end
+
+  def test_insert
+  end
+=begin
+  def test_remove_existing_icon
+    iconDict = FXIconDict.new(app)
+    iconDict.insert("gnu-animal.xpm")
+    assert_equal(1, iconDict.size)
+    assert_nil(iconDict.remove("gnu-animal.xpm"))
+    assert_equal(0, iconDict.size)
+  end
+
+  def test_remove_nonexistent_icon
+    iconDict = FXIconDict.new(app)
+    assert_nil(iconDict.remove("xxxxx.png"))
+  end
+=end
+  def test_find
+  end
+end
+

data/test/TC_FXIconList.rb

@@ -0,0 +1,192 @@
+require 'test/unit'
+require 'testcase'
+require 'fox16'
+
+class TC_FXIconList < Fox::TestCase
+  include Fox
+
+
+private
+
+  def checkBounds(meth, *args)
+    assert_raises(IndexError) {
+      @iconList.send(meth, -1, *args)
+    }
+    assert_raises(IndexError) {
+      @iconList.send(meth, 1, *args)
+    }
+    assert_nothing_raised(IndexError) {
+      @iconList.send(meth, 0, *args)
+    }
+  end
+
+public
+
+  def setup
+    super('TC_FXIconList')
+    @iconList = FXIconList.new(mainWindow)
+  end
+
+  def test_appendItem_byItem
+    items = []
+    0.upto(4) do |i|
+      items << FXIconItem.new("item#{i}")
+    end
+    assert_equal(0, @iconList.numItems)
+    @iconList.appendItem(items[0])
+    assert_equal(1, @iconList.numItems)
+    @iconList.appendItem(items[1], true)
+    assert_equal(2, @iconList.numItems)
+    @iconList.appendItem(items[2], false)
+    assert_equal(3, @iconList.numItems)
+    assert_raises(ArgumentError) do
+      @iconList.appendItem(items[3], 42) # second argument must be true or false
+    end
+    assert_equal(3, @iconList.numItems)
+  end
+
+  def test_appendOp
+    assert_equal(0, @iconList.numItems)
+    @iconList << FXIconItem.new("item1")
+    assert_equal(1, @iconList.numItems)
+    @iconList << FXIconItem.new("item2")
+    assert_equal(2, @iconList.numItems)
+    @iconList << FXIconItem.new("item3")
+    assert_equal(3, @iconList.numItems)
+  end
+
+  def test_removeHeader
+    @iconList.appendHeader("One")
+    checkBounds(:removeHeader)
+  end
+
+  def test_setHeaderText
+    @iconList.appendHeader("One")
+    checkBounds(:setHeaderText, "Foo")
+  end
+
+  def test_getHeaderText
+    @iconList.appendHeader("Boo")
+    checkBounds(:getHeaderText)
+  end
+
+  def test_setHeaderIcon
+    @iconList.appendHeader("Boo")
+    checkBounds(:setHeaderIcon, nil)
+  end
+
+  def test_getHeaderIcon
+    @iconList.appendHeader("Boo")
+    checkBounds(:getHeaderIcon)
+  end
+
+  def test_setHeaderSize
+    @iconList.appendHeader("Boo")
+    checkBounds(:setHeaderSize, 0)
+  end
+
+  def test_getHeaderSize
+    @iconList.appendHeader("Boo")
+    checkBounds(:getHeaderSize)
+  end
+
+  def test_getItem
+    @iconList.appendItem("Foo")
+    assert_equal(1, @iconList.numItems)
+    checkBounds(:getItem)
+  end
+
+  def test_moveItem
+    @iconList.appendItem("First")
+    @iconList.appendItem("Second")
+    assert_raises(IndexError) {
+      @iconList.moveItem(0, -1)
+    }
+    assert_raises(IndexError) {
+      @iconList.moveItem(0, 2)
+    }
+    assert_raises(IndexError) {
+      @iconList.moveItem(-1, 0)
+    }
+    assert_raises(IndexError) {
+      @iconList.moveItem(2, 0)
+    }
+    assert_nothing_raised(IndexError) {
+      @iconList.moveItem(0, 0)
+      @iconList.moveItem(0, 1)
+      @iconList.moveItem(1, 0)
+      @iconList.moveItem(1, 1)
+    }
+    assert_equal(0, @iconList.moveItem(0, 1))
+    assert_equal(1, @iconList.moveItem(1, 0))
+  end
+
+  def test_SEL_REPLACED
+    @iconList.appendItem("One")
+    @iconList.appendItem("Two")
+    itemIndex = 0
+    @iconList.connect(SEL_REPLACED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @iconList.setItem(1, "", nil, nil, nil, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_SEL_INSERTED
+    @iconList.appendItem("One")
+    @iconList.appendItem("Two")
+    itemIndex = 0
+    @iconList.connect(SEL_INSERTED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @iconList.insertItem(1, "One Point Five", nil, nil, nil, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_SEL_DELETED
+    @iconList.appendItem("One")
+    @iconList.appendItem("Two")
+    itemIndex = 0
+    @iconList.connect(SEL_DELETED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @iconList.removeItem(1, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_SEL_SELECTED
+    @iconList.appendItem("One")
+    @iconList.appendItem("Two")
+    itemIndex = 0
+    @iconList.connect(SEL_SELECTED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @iconList.selectItem(1, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_SEL_DESELECTED
+    @iconList.appendItem("One")
+    @iconList.appendItem("Two")
+    itemIndex = 0
+    @iconList.connect(SEL_DESELECTED) { |sender, sel, ptr|
+      itemIndex = ptr
+    }
+    @iconList.selectItem(1, true)
+    @iconList.deselectItem(1, true)
+    assert_equal(1, itemIndex)
+  end
+
+  def test_makeItemVisible
+    items = []
+    0.upto(2) { |i|
+      items << @iconList.appendItem("item#{i}")
+    }
+    assert_raises(IndexError) {
+      @iconList.makeItemVisible(-1)
+    }
+    assert_raises(IndexError) {
+      @iconList.makeItemVisible(3)
+    }
+  end
+end