summaryrefslogtreecommitdiff
path: root/test/win32ole/test_ole_methods.rb
blob: cb903566b9f5447591e1415e845738fba50d4a49 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
# frozen_string_literal: false
#
# This is test for [ruby-talk:196897]
#
begin
  require 'win32ole'
rescue LoadError
end
require "test/unit"

if defined?(WIN32OLE)
  class TestWIN32OLE_FOR_PROPERTYPUTREF < Test::Unit::TestCase

    def setup
      @obj = WIN32OLE.new('Scripting.Dictionary')
    end

    def test_ole_methods
      x = @obj.ole_methods.select {|m|
        m.invoke_kind == 'PROPERTYPUTREF'
      }
      assert(x.size > 0)
      assert_equal(1, x.size)
      assert_equal('Item', x[0].name)
    end

    def test_ole_put_methods
      x = @obj.ole_put_methods.select {|m|
        m.invoke_kind == 'PROPERTYPUTREF'
      }
      assert(x.size > 0)
      assert_equal(1, x.size)
      assert_equal('Item', x[0].name)
    end

  end
end