Class: TestWIN32OLE_PROPERTYPUTREF

Inherits:
Test::Unit::TestCase
  • Object
show all
Defined in:
tests/test_propertyputref.rb

Instance Method Summary collapse

Instance Method Details

#setupObject



5
6
7
8
9
10
11
# File 'tests/test_propertyputref.rb', line 5

def setup
  begin
    @sapi = WIN32OLE.new('SAPI.SpVoice')
  rescue WIN32OLERuntimeError
    @sapi = nil
  end
end

#test_sapiObject



12
13
14
15
16
17
18
# File 'tests/test_propertyputref.rb', line 12

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