by Richard Russell, March 2013

This article is specific to the SAPI5 speech system, typically installed on Windows 2000, XP and later

The code below can be used to discover the currently selected voice name:

        voice$ = FN_getvaluestr(tts%, "Voice.GetDescription")

Where tts% is the value returned from “FN_createobject(“Sapi.SpVoice”)”.

Here is a self-contained program illustrating its use:

        INSTALL @lib$+"COMLIBA"
 
        ON ERROR PROC_comexit : PRINT 'REPORT$ : END
        ON CLOSE PROC_comexit : QUIT
        PROC_cominit
 
        tts% = FN_createobject("Sapi.SpVoice")
        IF tts%=0 ERROR 100, "SAPI5 is not available"
 
        voice$ = FN_getvaluestr(tts%, "Voice.GetDescription")
        PRINT voice$
 
        PROC_releaseobject(tts%)
        PROC_comexit
        END