Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Msagent, how do I wait till its done
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Divers
Thread ID:
00773778
Message ID:
00774217
Vues:
12
nop, had to change it to the genie (only one i currently have)
LOCAL loform AS FORM

loForm = CREATEOBJECT("Form")
loForm.ADDOBJECT("agent", "oleControl", "Agent.Control.2")

*loForm.Agent.Characters.LOAD("Genie", "http://agent.microsoft.com/characters/genie/genie.acf")
loForm.Agent.Characters.LOAD("Genie", "c:\dev1\test\genie.acf")
*loForm.Agent.Characters.LOAD("Merlin", "Merlin.acs")
loForm.SHOW()

loRequest = loForm.Agent.Characters("Genie").SHOW()
DO WHILE INLIST(loRequest.STATUS, 2, 4)
	DOEVENTS
ENDDO
loRequest = loForm.Agent.Characters("Genie").Speak("Hello")
DO WHILE INLIST(loRequest.STATUS, 2, 4)
	DOEVENTS
ENDDO
same result - no character but the baloon
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform