[SAPI 5.3]Pobranie listy dostępnych głosów

ISpVoice * pVoice;
HRESULT hr;

...

HRESULT ttsgetvoices( ISpObjectToken ** ppToken )
{
    pVoice = NULL;
    if( FAILED(::CoInitialize( NULL ) ) )
         return FALSE;
   
    hr = CoCreateInstance( CLSID_SpVoice, NULL, CLSCTX_ALL, IID_ISpVoice,( void ** ) & pVoice );
    if( SUCCEEDED( pVoice->GetVoice( ppToken ) ) )
    {
        ::CoUninitialize();
        return TRUE;
    }
    ::CoUninitialize();
    return FALSE;
}
...

ISpObjectToken * ppToken;
...
void main() // w rzeczywistości jest inna funkcja (podałem dla przykładu)
{
    ...
   
    ttsgetvoices( & ppToken );
   
    ...
}