Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
MsAgent Text-to-Speech?Who knows DLL fx and parameters n
Message
De
17/09/1999 03:34:13
Amit Abhangrao
Charmi Software Exports
Mumbai, Inde
 
 
À
17/09/1999 02:39:28
Information générale
Forum:
Visual FoxPro
Catégorie:
Fonctions Windows API
Divers
Thread ID:
00265763
Message ID:
00265769
Vues:
25
Hi Justok,

It is really very good tool to include. You can also do it through CREATEOBJECT()

Code is like
************

m_AgentShow = 1
On Error myerror = 1
m_AgentObject = createobject('Agent.Control.2')
On Error && If not installed properly, error will come
If Type('m_AgentObject') # 'O' Or MyError = 1
m_AgentShow = 0
Else
m_AgentObject.connected = .t. && U need to connect if using as COM
m_AgentObject.Characters.Load("MyAgent", "C:\Acs\merlin.acs")
EndIf
If m_AgentShow = 1
m_AgentObject.Characters("MyAgent").Show
m_AgentObject.characters("MyAgent").speak("Hi, How are you Justok?")
m_AgentObject.characters.unload("MyAgent")
EndIf

*****

Hope This help
Regards
Amit
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform