I tried this sample
- Code: Select all Expand view
#include "FiveWin.ch"
function Main()
local oVoice := TOleAuto():New( "Sapi.SPVoice" )
local voice
for each voice in oVoice:GetVoices()
MsgInfo( voice:GetDescription )
next
return nil
and it return back a msginfo with Microsoft Anna - English(United States)
then when I tried all your sample to speack the pc it make crash