Wait, metodo

[Microsoft Agent è deprecato a partire da Windows 7 e potrebbe non essere disponibile nelle versioni successive di Windows.]

Descrizione

Fa sì che la coda di animazione per il carattere specificato attenda fino al completamento della richiesta di animazione specificata.

sintassi

agente**. Caratteri ("CharacterID"). Wait**Request

Parte	Descrizione
richiesta	Oggetto Request che specifica un'animazione specifica.

 

Osservazioni

Usare questo metodo solo quando si supportano più caratteri (simultanei) e si tenta di sequenziare l'interazione dei caratteri. Per un singolo carattere, ogni richiesta di animazione viene riprodotta in sequenza dopo il completamento della richiesta precedente. Se hai due caratteri e vuoi che la richiesta di animazione di un carattere attenda il completamento dell'animazione dell'altro personaggio, imposta il metodo Wait sull'animazione dell'altro carattere request oggetto. Per specificare il parametro di richiesta, è necessario creare una variabile e assegnare la richiesta di animazione da interrompere:

   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

Puoi anche semplificare il codice chiamando direttamente Wait, usando una richiesta di animazione specifica.

   Robby.Wait Genie.Play "GestureRight"

In questo modo si evita di dover dichiarare in modo esplicito un oggettorichiesta di.