Вверх ↑
Ответов: 667
Рейтинг: 140
#1: 2021-08-22 16:14:25 ЛС | профиль | цитата
Neo писал(а):
Как запустить SAPI5 в виндовс7?

На Windows10-64 прекрасно работает.
Add(MainForm,2559029,182,126)
{
link(onCreate,13219858:doData,[])
}
Add(DoData,13219858,238,140)
{
Data=String(Маленькая проверочка голоса)
link(onEventData,224191:doWork,[])
}
Add(VBJScript,224191,294,140)
{
WorkPoints=#6:doWork|
Script=#22:Sub doWork(Data,Index)|9:Dim sapi|38:Set sapi=CreateObject("sapi.spvoice") |15:sapi.Speak Data|7:End Sub|0:|0:|4: |
UseName=0
}


Также пример схемы проговаривающей текущее время.
Add(MainForm,2953706,77,105)
{
Width=287
Height=116
}
Add(Button,12330739,140,105)
{
Left=20
Top=25
Caption="Время"
link(onClick,224191:doWork,[])
}
Add(VBJScript,224191,203,105)
{
WorkPoints=#6:doWork|
Script=#22:Sub doWork(Data,Index)|9:Dim sapi|38:Set sapi=CreateObject("sapi.spvoice") |33:sapi.Speak FormatDateTime(now, 3)|18:'sapi.Speak Time()|7:End Sub|0:|0:|4: |
UseName=0
}

карма: 14

0
Редактировалось 1 раз(а), последний 2021-08-22 16:15:02