require 'test/unit'
require 'fox16'
require 'testcase'

class TC_FXScrollWindow < Fox::TestCase
  include Fox

  def setup
    super(self.class.name)
    @scrollWindow = FXScrollWindow.new(mainWindow)
  end

  def test_position_get
    pos = @scrollWindow.position
    assert_instance_of(Array, pos)
    assert_equal(2, pos.size)
    assert_kind_of(Integer, pos[0])
    assert_kind_of(Integer, pos[1])
  end

  def test_setPosition
    @scrollWindow.setPosition(0, 0)
  end

  def test_position_move_and_resize
    @scrollWindow.position(0, 0, 1, 1)
  end
end