Добрый день.
Пытаюсь прикрутить голос на MS SRV 2008 R2 в терминальной 1Сv7.
SAPI 5.3
Speech=СоздатьОбъект("Sapi.SpVoice");
КоллекцияГолосов = Speech.getVoices();
КолвоГолосов = КоллекцияГолосов.Count-1; //7
Голос = КоллекцияГолосов.Item(ТекГолос); //Хочу услышать последний
Сообщить(Голос.GetDescription()); //Да, это нужный голос
Speech.Voice = Голос; //Тут "Метод не найден"
В VB прокатило:
Sub Test()
Set Speech = CreateObject("SAPI.spVoice")
Set Speech.Voice = Speech.GetVoices().Item(Speech.GetVoices().Count - 1)
Speech.Speak ("Hello!")
End Sub
и не прокатило без 2-го SET:
Sub Test()
Set Speech = CreateObject("SAPI.spVoice")
Speech.Voice = Speech.GetVoices().Item(Speech.GetVoices().Count - 1)
Speech.Speak ("Hello!")
End Sub
Говорит "Object dosn't support this property or method"