Wait, méthode

[Microsoft Agent est déconseillé à partir de Windows 7 et peut être indisponible dans les versions ultérieures de Windows.]

Description

Provoque la fin de la file d’attente d’animation pour le caractère spécifié jusqu’à la fin de la demande d’animation spécifiée.

syntaxe

agent**. Caractères ( »CharacterID« ). Wait**Request

Partie	Description
demande de	Objet Request spécifiant une animation particulière.

 

Remarques

Utilisez cette méthode uniquement lorsque vous prenez en charge plusieurs caractères (simultanés) et essayez de séquencer l’interaction des caractères. (Pour un seul caractère, chaque demande d’animation est lue séquentiellement après la fin de la requête précédente.) Si vous avez deux caractères et que vous souhaitez que la demande d’animation d’un caractère attend la fin de l’animation de l’autre caractère, définissez la méthode Wait sur l’animation de l’autre caractère Request objet. Pour spécifier le paramètre de requête, vous devez créer une variable et affecter la demande d’animation que vous souhaitez interrompre :

   Dim GenieRequest 
   Dim RobbyRequest 
   Dim Genie 
   Dim Robby 

   Sub window_Onload

   Agent1.Characters.Load "Genie", "https://agent.microsoft.com/characters/v2/genie/genie.acf"
   Agent1.Characters.Load "Robby", "https://agent.microsoft.com/characters/v2/robby/robby.acf"

   Set Genie = Agent1.Characters("Genie")
   Set Robby = Agent1.Characters("Robby")

   Genie.Get "State", "Showing"
   Robby.Get "State", "Showing"

   Genie.Get "Animation", "Announce, AnnounceReturn, Pleased, _ 
      PleasedReturn"
   
   Robby.Get "Animation", "Confused, ConfusedReturn, Sad, SadReturn"

   Set Genie = Agent1.Characters ("Genie")
   Set Robby = Agent1.Characters ("Robby")

   Genie.MoveTo 100,100
   Genie.Show

   Robby.MoveTo 250,100
   Robby.Show

   Genie.Play "Announce"
   Set GenieRequest = Genie.Speak ("Why did the chicken cross the road?")
   
   Robby.Wait GenieRequest
   Robby.Play "Confused"
   Set RobbyRequest = Robby.Speak ("I don't know. Why did the chicken _
      cross the road?")
   
   Genie.Wait RobbyRequest
   Genie.Play "Pleased"
   Set GenieRequest = Genie.Speak ("To get to the other side.")
   
   Robby.Wait GenieRequest
   Robby.Play "Sad"
   Robby.Speak "I never should have asked."

   End Sub

Vous pouvez également simplifier votre code en appelant simplement 'attente directement, à l’aide d’une demande d’animation spécifique.

   Robby.Wait Genie.Play "GestureRight"

Cela évite d’avoir à déclarer explicitement un objet Request.