reflexion 0.6.0 → 0.7.0

data/test/test_window.rb

@@ -3,78 +3,84 @@ require_relative 'helper'
 
 class TestWindow < Test::Unit::TestCase
 
-  def win(*a, **k, &b)
-    Reflex::Window.new(*a, **k, &b)
-  end
+  include HasWindow
 
   def point(*a)  Reflex::Point.new(*a) end
   def bounds(*a) Reflex::Bounds.new(*a) end
 
   def test_show_hide_hidden()
-    w = win
-    assert_true  w.hidden
+    w = window
+    assert_true  w.hidden?
     w.show
-    assert_false w.hidden
+    assert_false w.hidden?
     w.hide
-    assert_true  w.hidden
+    assert_true  w.hidden?
   end
 
   def test_hidden_count()
-    w = win
+    w = window
     w.hide
-    assert_true  w.hidden
+    assert_true  w.hidden?
     w.show
-    assert_true  w.hidden
+    assert_true  w.hidden?
     w.show
-    assert_false w.hidden
+    assert_false w.hidden?
   end
 
   def test_coord_conversion()
-    w = win x: 100, y: 200
+    w = window x: 100, y: 200
     assert_equal [400, 300], w.from_screen(500).to_a
     assert_equal [600, 700], w.  to_screen(500).to_a
   end
 
   def test_title()
-    w = win
+    w = window
     assert_equal '',  w.title
     w.title = 'A'
     assert_equal 'A', w.title
   end
 
   def test_frame()
-    w = win
+    w = window
     b = w.frame.dup
     assert_equal b, w.frame
 
-    min_width = w.frame.width
-    minw      = -> value {[min_width, value].max}
+    w.frame =  1;                 assert_equal [0, 0,    1, 1],     w.frame.to_a
+    w.frame = [1];                assert_equal [0, 0,    1, 1],     w.frame.to_a
+    w.frame = [1, 2];             assert_equal [0, 0,    1, 2],     w.frame.to_a
+    w.frame = [1, 2, 3];          assert_equal [0, 0,    1, 2],     w.frame.to_a
+    w.frame = [1, 2, 3];          assert_equal [0, 0, 0, 1, 2, 0],  w.frame.to_a(3)
+    w.frame = [1, 2, 3, 4];       assert_equal [1, 2,    3, 4],     w.frame.to_a
+    w.frame = [1, 2, 3, 4];       assert_equal [1, 2, 0, 3, 4, 0],  w.frame.to_a(3)
+    w.frame = [1, 2, 3, 4, 5, 6]; assert_equal [1, 2,    4, 5],     w.frame.to_a
+    w.frame = [1, 2, 3, 4, 5, 6]; assert_equal [1, 2, 0, 4, 5, 0],  w.frame.to_a(3)
+
+    w.frame =  point(1);                        assert_equal [0, 0,    1, 1],    w.frame.to_a
+    w.frame = [point(1)];                       assert_equal [0, 0,    1, 1],    w.frame.to_a
+    w.frame =  point(1, 2);                     assert_equal [0, 0,    1, 2],    w.frame.to_a
+    w.frame = [point(1, 2)];                    assert_equal [0, 0,    1, 2],    w.frame.to_a
+    w.frame = [point(1, 2),    point(3, 4)];    assert_equal [1, 2,    3, 4],    w.frame.to_a
+    w.frame = [point(1, 2),    point(3, 4)];    assert_equal [1, 2, 0, 3, 4, 0], w.frame.to_a(3)
+    w.frame = [point(1, 2, 3), point(4, 5, 6)]; assert_equal [1, 2,    4, 5],    w.frame.to_a
+    w.frame = [point(1, 2, 3), point(4, 5, 6)]; assert_equal [1, 2, 0, 4, 5, 0], w.frame.to_a(3)
+
+    w.frame =  bounds(1, 2, 3, 4, 5, 6);  assert_equal [1, 2, 0, 4, 5, 0], w.frame.to_a(3)
+    w.frame = [bounds(1, 2, 3, 4, 5, 6)]; assert_equal [1, 2, 0, 4, 5, 0], w.frame.to_a(3)
+  end
 
-    w.frame =  1;                 assert_equal [0, 0,    minw[1], 1],     w.frame.to_a
-    w.frame = [1];                assert_equal [0, 0,    minw[1], 1],     w.frame.to_a
-    w.frame = [1, 2];             assert_equal [0, 0,    minw[1], 2],     w.frame.to_a
-    w.frame = [1, 2, 3];          assert_equal [0, 0,    minw[1], 2],     w.frame.to_a
-    w.frame = [1, 2, 3];          assert_equal [0, 0, 0, minw[1], 2, 0],  w.frame.to_a(3)
-    w.frame = [1, 2, 3, 4];       assert_equal [1, 2,    minw[3], 4],     w.frame.to_a
-    w.frame = [1, 2, 3, 4];       assert_equal [1, 2, 0, minw[3], 4, 0],  w.frame.to_a(3)
-    w.frame = [1, 2, 3, 4, 5, 6]; assert_equal [1, 2,    minw[4], 5],     w.frame.to_a
-    w.frame = [1, 2, 3, 4, 5, 6]; assert_equal [1, 2, 0, minw[4], 5, 0],  w.frame.to_a(3)
+  def test_frame_without_titlebar()
+    w = window titlebar: []
+    b = [100, 100, 300, 400]
 
-    w.frame =  point(1);                        assert_equal [0, 0,    minw[1], 1],    w.frame.to_a
-    w.frame = [point(1)];                       assert_equal [0, 0,    minw[1], 1],    w.frame.to_a
-    w.frame =  point(1, 2);                     assert_equal [0, 0,    minw[1], 2],    w.frame.to_a
-    w.frame = [point(1, 2)];                    assert_equal [0, 0,    minw[1], 2],    w.frame.to_a
-    w.frame = [point(1, 2),    point(3, 4)];    assert_equal [1, 2,    minw[3], 4],    w.frame.to_a
-    w.frame = [point(1, 2),    point(3, 4)];    assert_equal [1, 2, 0, minw[3], 4, 0], w.frame.to_a(3)
-    w.frame = [point(1, 2, 3), point(4, 5, 6)]; assert_equal [1, 2,    minw[4], 5],    w.frame.to_a
-    w.frame = [point(1, 2, 3), point(4, 5, 6)]; assert_equal [1, 2, 0, minw[4], 5, 0], w.frame.to_a(3)
+    w.frame = b
+    assert_equal b, w.frame.to_a
 
-    w.frame =  bounds(1, 2, 3, 4, 5, 6);  assert_equal [1, 2, 0, minw[4], 5, 0], w.frame.to_a(3)
-    w.frame = [bounds(1, 2, 3, 4, 5, 6)]; assert_equal [1, 2, 0, minw[4], 5, 0], w.frame.to_a(3)
+    w.frame = w.frame
+    assert_equal b, w.frame.to_a
   end
 
   def test_menu()
-    w = win
+    w = window
     m = Reflex::Menu.new
     assert_nil      w.menu
     w.menu = m
@@ -84,7 +90,7 @@ class TestWindow < Test::Unit::TestCase
   end
 
   def test_closable?()
-    w = win
+    w = window
     assert_true  w.closable?
 
     w.closable = false
@@ -101,7 +107,7 @@ class TestWindow < Test::Unit::TestCase
   end
 
   def test_minimizable?()
-    w = win
+    w = window
     assert_true  w.minimizable?
 
     w.minimizable = false
@@ -118,7 +124,7 @@ class TestWindow < Test::Unit::TestCase
   end
 
   def test_resizable?()
-    w = win
+    w = window
     assert_true  w.resizable?
 
     w.resizable = false
@@ -134,8 +140,87 @@ class TestWindow < Test::Unit::TestCase
     assert_true  w.resizable?
   end
 
+  def test_titlebar()
+    w = window
+    assert_equal [:buttons, :background], w.titlebar
+
+    w.titlebar = [:background]
+    assert_equal [:background], w.titlebar
+
+    if win32?
+      assert_raise(ArgumentError) {w.titlebar = [:buttons]}.then do |e|
+        assert_match(/buttons.*needs.*background/i, e.message)
+      end
+    else
+      w.titlebar = [:buttons]
+      assert_equal [:buttons], w.titlebar
+    end
+
+    w.titlebar = []
+    assert_equal [], w.titlebar
+
+    w.titlebar = [:buttons, :background]
+    assert_equal [:buttons, :background], w.titlebar
+
+    assert_equal [], window(titlebar: []).titlebar
+
+    assert_raise(ArgumentError) {w.titlebar = [:unknown]}
+  end
+
+  def test_unlisted?()
+    w = window
+    assert_false w.unlisted?
+
+    w.unlisted = true
+    assert_true  w.unlisted?
+
+    w.unlisted = false
+    assert_false w.unlisted?
+
+    assert_true window(unlisted: true).unlisted?
+  end
+
+  def test_shadow?()
+    titlebar = win32? ? [] : [:buttons, :background]
+    w        = window titlebar: titlebar
+    assert_true  w.shadow?
+
+    w.shadow = false
+    assert_false w.shadow?
+
+    w.shadow = true
+    assert_true  w.shadow?
+
+    w.shadow false
+    assert_false w.shadow?
+
+    w.shadow true
+    assert_true  w.shadow?
+
+    assert_false window(titlebar: titlebar, shadow: false).shadow?
+  end
+
+  def test_transparent?()
+    w = window
+    assert_false w.transparent?
+
+    w.transparent = true
+    assert_true  w.transparent?
+
+    w.transparent = false
+    assert_false w.transparent?
+
+    w.transparent true
+    assert_true  w.transparent?
+
+    w.transparent false
+    assert_false w.transparent?
+
+    assert_true window(transparent: true).transparent?
+  end
+
   def test_fullscreen?()
-    w = win
+    w = window
     assert_false w.fullscreen?
 
     w.fullscreen = true
@@ -151,8 +236,75 @@ class TestWindow < Test::Unit::TestCase
     assert_false w.fullscreen?
   end
 
+  def test_always_on_top_and_bottom?()
+    w = window
+    assert_false w.always_on_top?
+    assert_false w.always_on_bottom?
+
+    w.always_on_top = true
+    assert_true  w.always_on_top?
+    assert_false w.always_on_bottom?
+
+    assert_true window(always_on_top: true).always_on_top?
+
+    if linux?
+      assert_raise(Rucy::NativeError) {w.always_on_bottom = true}
+      return
+    else
+      assert_true window(always_on_bottom: true).always_on_bottom?
+    end
+
+    w.always_on_bottom = true
+    assert_false w.always_on_top?
+    assert_true  w.always_on_bottom?
+
+    w.always_on_bottom = false
+    assert_false w.always_on_top?
+    assert_false w.always_on_bottom?
+  end
+
+  def test_pointer_through?()
+    w = window
+    assert_false w.pointer_through?
+
+    if linux?
+      assert_raise(Rucy::NativeError) {w.pointer_through = true}
+      return
+    end
+
+    w.pointer_through = true
+    assert_true  w.pointer_through?
+
+    w.pointer_through = false
+    assert_false w.pointer_through?
+
+    w.pointer_through true
+    assert_true  w.pointer_through?
+
+    w.pointer_through false
+    assert_false w.pointer_through?
+
+    assert_true window(pointer_through: true).pointer_through?
+  end
+
+  def test_pointer_through_alpha()
+    w = window
+    assert_equal 1, w.pointer_through_alpha
+
+    w.pointer_through_alpha = 0.5
+    assert_equal 0.5, w.pointer_through_alpha
+
+    w.pointer_through_alpha 0
+    assert_equal 0, w.pointer_through_alpha
+
+    assert_raise(ArgumentError) {w.pointer_through_alpha = -0.1}
+    assert_raise(ArgumentError) {w.pointer_through_alpha =  1.1}
+
+    assert_equal 0.5, window(pointer_through_alpha: 0.5).pointer_through_alpha
+  end
+
   def test_orientations()
-    w = win
+    w = window
     assert_equal [], w.orientations
 
     assert_raise(ArgumentError) {w.orientations = [:portrait]}.then do |e|
@@ -164,11 +316,11 @@ class TestWindow < Test::Unit::TestCase
   end
 
   def test_screen()
-    assert_not_nil win.screen
+    assert_not_nil window.screen
   end
 
   def test_root()
-    w = win
+    w = window
     assert_not_nil       w.root
     assert_nil           w.root.parent
     assert_equal 'ROOT', w.root.name
@@ -176,7 +328,7 @@ class TestWindow < Test::Unit::TestCase
   end
 
   def test_inspect()
-    assert_match %r|#<Reflex::Window:0x\w{16}>|, win.inspect
+    assert_match %r|#<Reflex::Window:0x\w{16}>|, window.inspect
   end
 
 end# TestWindow