hi, i have not post a Sample while Original Source use *.RC and EDITTEXT but for full working Sample i need RTF but don´t know how to change *.RC please can somebody change EDITTEXT to RTF to get it full working, please https://forums.fivetechsupport.com/viewtopic.php?t=12983 i have ...
... Function ChangeVoice() //cambiar voz desde un doble click sobre la lista de narradores//oNarrator := CreateObject( "Sapi.SPVoice" , "WithEvents" ) Local oVoice For Each oVoice In oNarrator:GetVoices() ...
... you too? ¿Puedes publicar la prueba completa con los recursos para que podamos ayudarte también? Hola Silvio ya está la solución con respecto a Sapi.Voice con la ayuda de Antonio Linares Yes It run ok but i Wish change the voices
Hola Jmmy : yo lo resolví asi en HMG/Harbour Function Play() oNarrator:EventInterests := SVEAllEvents + SVEAudioLevel oNarrator:Speak( Main.RichEdit_1.VALUE, ( SVSFlagsAsync + SVSFPurgeBeforeSpeak )) Do While .NOT. (oNarrator:WaitUntilDone (.1) ) SetPrope...
hi Daniel, i have try to Debug Events (see last Page) and have ask "what does they mean" Antonio found Solution that 1st Parameter are the Event "Number" Events and meanings: 1 --> Start 3 --> An OLE object is received, probably self OLE object ? 5 --> Word, 4th param is...
Hola Jimmy : me explicarias como se disparan los eventos al utilizar oSpVoice:__hSink := __axRegisterHandler( oSpVoice:__hObj, { | a, b, c, d, e | OnEvent( a, b, c, d, e ) } ) al hacer Play en el form DEFINE BUTTON oBtnPlay ROW 160 &nb...
hi Antonio, Events and meanings: 1 --> Start 3 --> An OLE object is received, probably self OLE object ? 5 --> Word, 4th param is position, 5th param is length 6 --> ??? 7 --> Sentence, 4th param is position, 5th param is length 8 --> ??? 2 --> End thx for your List f Event mean...
Hola Jimmy : Leyendo creo que se necesita la propiedad "Status" https://learn.microsoft.com/en-us/previous-versions/windows/desktop/ms723612(v=vs.85) pero no consigo descifrar bien el uso aqui https://learn.microsoft.com/en-us/previous-versions/windows/desktop/m...
hi Antonio, thx for the Idea. Result is same like using Property "Voice" Error description: (DOS Error -2147352573) WINOLE/1007 Argument error: VOICE Args: [ 1] = O Stack Calls =========== Called from: => TOLEAUTO:VOICE( 0 ) Called from: main.prg => CHANGEVOICE( 125 ) Called from: m...
Events and meanings: 1 --> Start 3 --> An OLE object is received, probably self OLE object ? 5 --> Word, 4th param is position, 5th param is length 6 --> ??? 7 --> Sentence, 4th param is position, 5th param is length 8 --> ??? 2 --> End https://learn.microsoft.com/en...