test/win32ole/test_propertyputref.rb


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

require 'test/unit'
begin
  require 'win32ole'
rescue LoadError
end

if defined?(WIN32OLE)
  class TestWIN32OLE_PROPERTYPUTREF < Test::Unit::TestCase
    def setup
      begin
        @sapi = WIN32OLE.new('SAPI.SpVoice')
      rescue WIN32OLERuntimeError
        @sapi = nil
      end
    end
    def test_sapi
      if @sapi
        new_id = @sapi.getvoices.item(2).Id
        @sapi.voice = @sapi.getvoices.item(2)
        assert_equal(new_id, @sapi.voice.Id)
      end
    end
  end
end