🚀 go-pugleaf

Thanks!


"JohnC" <jcibulskis@sbcglobal.net> schrieb im Newsbeitrag 
news:473ee927$1@newsgroups.borland.com...
> The following will "speak" anything - numbers as well as words.
> John
> //---------------------------------------------------------------------------
>
> #ifndef JMCSpeechH
> #define JMCSpeechH
>
> #include <sapi.h>           //For ISp definitions - part of SDK
>
> //---------------------------------------------------------------------------
>
> //Speech Utilities:
> //This object instantiates the COM Object SpVoice and gives us an easy
> //function call in order to speak a string.
>
> class TJMCSpeech
>  {
>    public:
>   TJMCSpeech();             //Constructor
>   ~TJMCSpeech();             //Destructor
>   void Speak(String Words);  //Speak the input words in the string.
> private:
>   HRESULT  hr;
>   ISpVoice*  pVoice;
>  };
>
>
> #endif
> -------------------
> //---------------------------------------------------------------------------
> #include <vcl.h>
> #pragma hdrstop
>
> #include "JMCSpeech.h"
> //#include "SUTIL.h"
> //---------------------------------------------------------------------------
>
> #pragma package(smart_init)
>
> //Constructor
> TJMCSpeech::TJMCSpeech()
> {
> hr = S_OK;
> pVoice = NULL;
> ::CoInitialize(NULL);
>
> //Create a SAPI voice:
> hr = CoCreateInstance( CLSID_SpVoice,NULL,CLSCTX_ALL,IID_ISpVoice,
>        (void**)&pVoice);
> }
> //Destructor
> TJMCSpeech::~TJMCSpeech()
> {
> if(SUCCEEDED(hr))
>  pVoice->Release();
>
> ::CoUninitialize();
> }
> //---------------------------------------------------------------------------
> void TJMCSpeech::Speak(String Words)
> {
> if(SUCCEEDED(hr))
>   pVoice->Speak(WideString(Words),SPF_DEFAULT,NULL);
> }
> //Note: I originally had:
> //   pVoice->Speak(TJMCSUtil::StrToBSTR(Words),SPF_DEFAULT,NULL);
> //It was pointed out by Remy Lebeau (TeamB) <no.spam@no.spam.com>
> //that this was a memory leak and that I should use the following:
> //   pVoice->Speak(WideString(Words),SPF_DEFAULT,NULL);
> //---------------------------------------------------------------------------
>
>
> "Marc" <info@mawnet.com> wrote in message 
> news:473ebe39$1@newsgroups.borland.com...
>> Hi all
>>
>> I try to implement a simple SAPI application that reads back a phone 
>> number. I downloaded the SDK 5.1 from Microsoft and had a look at the 
>> samples... and did not quite got into it. Does someone has a simple 
>> sample in BCB that just shows how to speak a number?
>>
>> Rds
>> Marc
>>
>
>