2006-06-18 11:34:53 +00:00
|
|
|
require 'test/unit'
|
2006-06-19 11:00:12 +00:00
|
|
|
begin
|
|
|
|
require 'win32ole'
|
|
|
|
rescue LoadError
|
|
|
|
end
|
2006-06-18 11:34:53 +00:00
|
|
|
|
2006-06-19 11:00:12 +00:00
|
|
|
if defined?(WIN32OLE)
|
|
|
|
class TestWIN32OLE_PROPERTYPUTREF < Test::Unit::TestCase
|
|
|
|
def setup
|
|
|
|
begin
|
|
|
|
@sapi = WIN32OLE.new('SAPI.SpVoice')
|
|
|
|
rescue WIN32OLERuntimeErro
|
|
|
|
@sapi = nil
|
|
|
|
end
|
2006-06-18 11:34:53 +00:00
|
|
|
end
|
2006-06-19 11:00:12 +00:00
|
|
|
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
|
2006-06-18 11:34:53 +00:00
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|